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U ABSTRACT 

THIS PROGRAM WlUt TEST PARITY ASQKTS DURING CPU EXECUTION OF READ/ 
RESTORE CUATn AND READ/PAUSE CDAIIP) MEMORY OPERATIONS, NORMAL 
PARITY IS GENERATED WHEN WRITING TO MEMORY (DATO) AND CHECKED FOR 
'OTHER' PARITY WHEN READING FROM MEMORY CDATI OR 0ATIP3, PARITY 
ABORTS ARt FORCED BY SETTING A PARITY CONTROU REGISTER FO^ 'OTHER' 
PARITY CNUT NORMAL) BEFORE EXECUTAQN OF DATI OR DATIP INSTRUCTIONS. 

THIS PROGHam DOES NOT TEST MEMORYl IT TESTS THE PROCESSOR AND 
ASSUMES MEMORY TO BE FUNCTIONING ^'ROPERLY, MAINDEC-l l-OCMFA 
WILL TEST MEMORY AND SHOULD BE RUN IN CONJUNCTION WITH THIS PROGRAM 
TO PROVIDt A THOROUGH TEST OF PARITY, 

2, REQUIREMENTS 

2.1 EQUIPMENT 

POP-n/40 OR PDP-ll/45 COMPUTER WITH CONSOLE TELETYPE, ANU AN MFll CC0RE3 
OR MSll C'^'OS) PARITY OPTION WITH ASSOCIATED PARITY MEMORY ANY 
WHERE WITHIN MACHINE BOUNDS 

2.2 STORAGE 

THIS PROGHAM REQUIRES APPROXIMATELY 3K STORAGE, 

2.3 PRELIMINARY PROGRAMS 

SINCE THIt> PROGRAM ASSUMES MEMORY TO BE FUNCTIONING PROPERLY CAS 
MENTIONED IN THE ABSTRACT) IT WOULD BE WISE TO RUN MAINDEC-U«DCMFA 
BEFORE THIS PROGRAM, 

3, LOADING Pi^OCEDURE 

USE STANDARD PROCEDURE FOR LOADING ,ABS TAPES, 



4.1 CONTROL SWITCH SETTINGS 
SEE PARAGRAPH 5, 

4.2 STARTING ADDRESS 



THE PROGRAM IS STARTED AT ADDRESS 200. 
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4,3 OPERATOR ACTION 

1, LOAD ^'ROGRAM INTO MEMORY USINi» ,ABS LOADER 

2, LOAD ADDRESS 200 

3, SET S^^ITCHES, IF ANY CStE PARAGRAPH 5,) 

4, PRESS START 

5, THE PKOGRAM WILL LOOP AND THE TELETYPE BELL WILL 
RING tVERY PASS (IF SW<10>«0) 

5, OPERATIONAL SWITCH SETTINGS 

SW<15>sl.t,HALT ON ERROR 
SW<14>=l,,.U00P ON TEST 
SW<13>sl. ••INHIBIT ERROR TYPEOUTS 
SW<12>»1.«. ALLOW USER TO SELECT 

.•.REGISTER HE DESIRES 
SW<U>»l.f .INHIBIT ITERATIONS 

CNOT USED) 
SW<10>3l,,,RING BELL ON ERROR 
SW<10>»0...RING BELL ON PASS COMPLETE 
SW<09>al.t.LOOP ON ERROR 
SW<08>«1,».LOOP ON SPECIAL TEST SHOWN 

IN SWS<7 THRU 0> 
SW<06>»1.*.DON^T ENABLE KTll OPTIUN 

EVEN IF PRESENT 
SWS<7 THRU 0>..,USED IN CQNJUNCTIUN WITH 
SW<08> DESCRIBED ABOVE 

5,1 THE SWITCHES DEFINED ABOVE ARE SELF EXPLANATORY EXCEPT FON THE 

SPECIAL COMBINATION OF SWS<06, 07 THRU 00» AND 12>. TWO t2) 
EXAMPLES ARE AS FOLLOWS: 

CI) THE USER WISHES TO SELECT A ^ARTICULAR REGISTER TO UNDERGO 
TESTiNG, NOT USE THE KTll, AND LOOP ON TST37 

(A) LOAD ADDRESS 200 

(0) SET SWITCHES 6 AND l«i 

CL) HIT START 

i^) THE TELETYPE WILL REi»POND BY ASKING THE USER TO 
•TYPE THE REGISTER YUU DESIRE & HIT CARRIAGE 
RETURN' , AND WILL WAIT FOR THIS RESPONSE 
E.G. 172110 CNOT 772110) 

(t) BEFORE TYPING A REPLY AND HITTING A CARRIAGE 

RETURN, PUT SW<06> AND SW<12> DOWN, SET SW<0e>, AND PLACE 
THE VALUE 37 INTO SW&<07 THRU 00> 

Cf") TYPE THE RESPONSE ANU HIT CARRIAGE RETURN 

W YOU SHOULD BE LOOPINi» ON TST37 WHICH CAN BE tASILY 
VERIFIED BY EXAMINING THE CONTENTS OF SLPADR 

NOTE! LOURING ON A PARTICULAR TE^T CAPABILITY WILL ONLY WQRK 
WHtN THE USER HAS SELECTED A PARTICULAR REGISTER 
USiNG THE SW<12> OPTION 
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C2) THE USER WISHES TQ SELECT A ^'ARTICULAR REGISTER TO 
UNOE»<GO TESTING, USE THE KTU, AND LOOP ON TST37 . 

Ui>e THE SAME PROCEDURE OEt>CRIBED UNDER CD ABOVE 
EXCEPT ONLY SET SW<12> UNDER ITEM CB) 

5,2 WHEN USINt» THE SW<12> OPTION THE i^ESPONSE EXPECTED IS A 

6 - DIGIT OCTAL NUMBER E.G. 17210W, 172120, ETC. 

IF THE UStR FOR SOME REASON DOES NOT TYPE A 6-DIGlT OCTAL 
NUMBER E.U, 172A...,.THE_TELETYPE WILL CARRIAGE RETURN, LANE 
FttiD, ANU TYPE A ^1' CQUtSTlON MAHK), IT WILL SIT HERE 
WAITING FUR THE NUMBER TO BE TYPEU CORRECTLY FOLLOWED BY 
A CARRlAGt RETURN, 

6. SUBROUTINt ABSTRACTS 

6.1 ABORT 

ONCE A REGISTER IS FOUND TO BE PRtSENT, THIS ROUTINE WILL SEARCH 
MEMORY, PtRFORMING A OATI, UNTIL THE CORRESPONDING PARITY MEMORY AREA 
IS FOUND, THIS ROUTINE IS ONLY U^ED DURING THE PROGRAM TABLE CREATION, 

6.2 SACCEPT 

THIS ROUTINE IN CONJUNCTION WITH »READC WILL ACCEPT AN OCTAL NUMBER 
FROM THE TELETYPE, THESE 2 ROUTINES ARE SUPPLIED BY AN EXTERNAL 
PACKAGE C^YSMAC.SML) AT ASSEMBLY ^IME. THEY ARE USED WHEN SW<12> 
IS SET TO A 1 BY THE USER. 



6.3 $B20CT 

THIS ROUTINE HANDLES TYPING OF BINARY TO OCTAL CASCII) NUMBERS, 
IT IS SUPPLIED BY AN EXTERNAL PACKAGE CSYSMACSML) AT ASStMBLY 
TIME, IT IS USED FDR ERROR REPORTING, 

6.4 CHECKLOC 

AFTER A PARITY ABORT HAS BEEN FORCED BY THE PROGRAM THIS ROUTINE 
WILL LOOK FOR THE CORRECT HIGH ORUER ERROR ADDRESS BITS IN THE 
PARITY CONTROL REGISTER AS WELL Ai> THE PROPER PC PUSH ON THE STACK 
FROM THE ABORT. ANY DISCREPANCIES ARE STORED FOR ERROR PKINTOUT, 
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6,5 COMPUT 

THIS ROUTINE IS INITIALLY USED TO DETERMINE (TOGETHER WITH THE 

ABORT ROUTINE) WHERE/IF PARITY MEMORY PRESIDES FOR A SPECAFIC 

PARITY CONTROL REGISTER. IT CREAlES A 2 LOCATION MEMORY MAP 

AT THE HIl'H END OF A IK BANK, FOK EXAMPLE, IF THE ADDRESJ* 17776 

WERE AOORtSSABLE, THEN THIS ROUTINE WOULD GIVE THE POLLOWiNG LOCATIONS 

AND CONTENTS: 



L«JC, 


CONTENTS* 


*KTll NOT TURNED 




17402 






17402 




L^JC. 


CONTENTS 


KTll TURNED ON 




23402 




1U02 


23402 





THESE 2 LOCATIONS AND CONTENTS WOULD THEN BE USED BY THE ABORT 
ROUTINE, * IF A PARITY ABORT OCCURRED THEN THESE LOCATIONS AND 
CONTENTS WITH THEIR ASSOCIATED PAKITY CONTROL REGISTER WOULD BE 
USED FOR t»UBSEOUENT TESTING. Rl WILL ALWAYS HOLD THE FIRi>T LOCATION 
OF THE 2 LOCATION MAP. 

6.6 SEOP 

THIS IS THE END OF PASS ROUTINE. BEFORE THE PROGRAM LOOPS 
BACK TO TtST THE NEXT TABLE ENTRY COR ITERATE ON THE CURRENT ONE) 
THIS ROUTiNE IS ENCOUNTERED, IT 13 SUPPLIED BY AN EXTERNAL PACKAGE 
CSYSMAC.SML) AT ASSEMBLY TIME, 

6.7 FLAGSCLR 

THIS ROUTINE IS USED TO CLEAR PERIINENT FLAGS BEFORE PASSING THRU 
THE PROGRAM WITH ANOTHER TABLE ENTRY OR ITERATING ON THE CURRENT 
ENTRY. 

6.8 SHLT 

THIS ROUTINE CALLED (IN NUMEROUS ►'LACES THRU OUT THE PROGHAM) BY 
THE 'EMT* INSTRUCTION IS USED WHENEVER AN ERROR HAS BEEN DETECTED, 
THIS ROUTINE RELIES ON SWS<9, 10, l^i 15> FOR FUNCTIONING ANU JS 
SUPPLIED by AN EXTERNAL PACKAGE (SYSMACSML) AT ASSEMBLY UME, THE 
TYPERR RO'JTINE WHICH TYPES OUT THt ERROR MESSAGES AND DATA HEADERS 
IS CALLED WITHIN THIS ROUTINE, 

6.9 INITIALIZt 

THIS ROUTINE WILL COMPLETELY REINITIALIZE PROGRAM FLAGS, tTC. BEFORE 
RESTARTINls THE PROGRAM OVER AT THt BEGINNING OF THE TABLE. 
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6,10 PARTS! 

ONCE A PAHlTY COMTROL REGISTER HAJ> BEEN FOUND TO BE PRESE'^'T THEN 
THIS ROUTiNE IS USED TO CHECK IF I HE REGISTER IN GOOD OPERATION 
BEFORE TESTING IS CONDUCTED, 



6,11 SPWRDN 

THIS ROUTiNE IN CONJUNCTION WITH »PWRUP COMPRISE THE 'POWtR FAIL^ 
ROUTINES. IF THE SYSTEM GOES DOWN WHILE THE PROGRAM IS EXECUTING, 
GENERAL PURPOSE REGISTERS THRU J ARE SAVED. WHEN THE StSTEM 
POWERS BACK UP THE MESSAGE 'POWER- WILL BE TYPED ON THE CUNSOLE 
TELETYPE, GENERAL PURPOSE REGISTERS THRU 5 ARE RESTOREU, AND 
THE PROGRAM WILL AUTOMATICALLY RE!>TART FROM THE BEGINNING. THESE 
2 ROUTINES* ARE SUPPLIED BY AN EXTtRNAL PACKAGE CSYSMACSML) AT 
ASSEMBLY 'IME. 



6.12 SSCOPE 

THIS ROUTINE CALLED CAT THE BEGINNING AND END OF EVERY TEi^T) BY 
THE 'lOT' INSTRUCTION IS USED FOR TEST LOOPING PURPOSES, IT 
DEPENDS UHON SWS<8 , 9 , 1 1 , U> FOR FUNCTIONING AND RECORDS THE 
STARTING ADDRESS OF EACH TEST IN 'SLPADR' AS IT IS ttEING tNTERED, 
'LPADR' CiN THE COMMON TAG SECTION OF THE PROGRAM) MAY BE EXAMINED 
TO DETERMINE THE LAST TEST SUCCESi>FULLY COMPLETED, THIS HQUTINE 
IS SUPPLIED BY AN EXTERNAL PACKAGt CSYSMAC.5ML) AT ASSEMBLY TIME, 

6.13 TRAPCATCHtR 

A '.+2* AND "HALT' SEQUENCE IS RE^'EATED FROM LOCATION TU LOCATION 
776 TO CAfCH ANY UNEXPECTED DEVICt TRAPS. THUS, ANY UNEXPECTED 
TRAPS WILL HALT AT THE DEVICE TRAP VECTOR ♦2. WHEN/IF THI^ OCCURS 
EXAMINATION OF THE STACK SHOULD Bt THF STARTING POINT TO •'IND WHERE 
IN THE PRUGRAM YOU WERE BEFORE THt UNEXPECTED TRAP OCCURRED, 

6,ia TYPERR 

THIS ROUTINE CALLED WITHIN THE $HLT ROUTINE HANDLES THE E^ROR 
MESSAGE AND DATA HEADER PRINTOUTS. 

6,15 VECSET 

THIS ROUTINE IS ACCESSED AT THE BEGINNING OF EVERY TEST TU SET 

UP THE ADljRESS OF THE SERVICE ROUIINE FOR THE PARITY ABORl VECTOR Ua. 
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7, ERROR PRINTOUTS 

*** SPECIAL NOTE *** 

BE AWARE That when the PROGRAM IS BEING EXECUTED WITH MEMURY 
MANAGEMENT ENABLED, THE 'ACTUAL' AND 'EXPECTED' ABORT PC 
VALUES GREATER THAN THE LAST ADDRtSS OF THE PROGRAM ARE 
VIRTUAL ADDRESSES, TO FIND THE PHYSICAL COR IN REALITY) 
ADDRESS PULL THE OFFSET VALUE FROM THE PROGRAM TABLE DESCRIBED 
IN PARAGRAPH 9,2, AND DO THE ADDITION PROCEDURE OUTLINED 
UNDER ITEM (2), PARAGRAPH 9.3 

*** END OF SPECIAL NOTE *** 

7.1 HLT +1 

TEST DIDN'T ABORT 

PROGRAM REGISTER EXPECTED 

PC UNDER TEST ABORT PC 

** APPROPRIATE VALUES ** 

7.2 HLT +2 

FATAL ERROR TO PROGRAM 
PROGRAM REGISTER 

PC UNDER TEST 
** APPROPRIATE VALUES ** 

NOTE: THIS ERROR REPORT WILL COMt FROM I OF 3 TESTS IN TME 
'PARTST' ROUTINE, SOMETHING WILL BE WRONG WITH BIT00 
OR eiT02 OF THE PARITY CONTROL REGISTER 

7.3 HLT +3 
ABORTED INCORRECTLY 

PROGRAM REGISTER EXPECTED ACTUAL EXPECTED 

PC UNDER TEST ADDR.BITS AD0R.8ITS ABORT PC 

** APPROPRIATE VALUES 

note: this error REPORT WILL COVER A NUMBER OF OCCURRENCES: 

CO THE EXPECTED HIGH OROtR ADDRESS BITS AND THE EXPECTED 
ABORT PC PUSHED ON THE STACK WERE BOTH WRONG, 
A3 IN THE CASE OF AN OLD MOS DESIGN WITH NO ADDRESS 

BITS ZEROS C0'S5 WILL APPEAR UNDER THE ADUR, BITS 

COLUMNS, 

C«2) THE EXPECTED HIGH OROtR ADDRESS BITS WERE CORRECT 
BUT THE WRONG ABORT PC WAS PUSHED ON THE STAC'<, 
B) IN THIS CASE THE VALUES APPEARING UNDER THE 
ADDR. BITS COLUMN*) WOULD BE THE SAME 
C^3 THE EXPECTED HIGH ORDtR ADDRESS BITS WERE INCURRECT 
BUT THE CORRECT ABORT PC WAS PUSHED ON THE STACK 
C3 IN THIS CASE THE VALUES APPEARING UNDER THt 
ABORT PC COLUMNS WUULD BE THE SAME 



ACTUAL 
ABORT PC 
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7.4 HIT +4 

NO PARITY r^EMORY FOUND BELOW aSK 

REGISTER 

UNDER TEST 

** APPROPRIATE VAUUE ** 

NOTE: THIS PRINTOUT WILL OCCUR f"OR I OF 2 REASONS: 

(I) WITH NO KTll OPTION ON THE SYSTEM, A PARITY 

CONTROL REGISTER WAS ("OUNO BUT THE CORRtSPONDiNG 
PARITY MEMORY WAS NQT FOUND IN LOOKING ALL THt 
WAY UP TO aSK, OR 

W A KTll OPTION IS ON T^E SYSTEM WITH THE PARITY 
CONTROL REGISTERS' CORRESPONDING PARITY MEMORY 
AREA ABOVE 28K BUT THt USER DISABLED THE KTll 
CDID NOT ALLOW USE) BY SETTING SW<06>, 

7.5 HLT +5 

RESET DOESN'T WORK 
PROGRAM HEGISTER 

PC U^IDER TEST 
*» APPROPRIATE VALUES ** 

NOTE: If- A KTll OPTION IS PRESENT, AND NOT DISABLED BY SETTING 
SW<06>, THEN THE TEST CTE5>T #4) INCURRING THIS PRINTOUT 
WILL NOT BE EXECUTED, 



7.6 HLT *h 

USER SELEt-TEO REGISTER NOT PRESENT 
PROGRAM 
PC 

** APPHprKlATfc VALUE ** 

NOTE: THIS PRINTOUT WILL COME AbQUT AS A RESULT OF USINt» 
THE SW<ia> OPTION, IF IN RESPONSE TO THE MESSAGE 
"TYPE THE REGISTER YOU WANT & HIT CARRIAGE RETURN" 
THE USER TYPES A NQN-EXISUNT REGISTER ADDRESS THfcN 
THE ABOVE PRINTOUT WILL oCcUR AND THE USER RESPONSE 
MtSSAGE WILL BE REITERATE^. 

7.7 HLT +7 

NO PARITY MEMORY FOUND AT ALL 

REGISTER 

UNDER TESl 

** APPROPRIATE VALUE ** 

NOTE: THIS ERROR PRINTOUT COULD OCCUR FOR I OF 2 REASONS: 
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Cl) THE KTll OPTION IS PRtSENT AND NOT OlSA&LED CASING 

SW<06>D INDICATING NOWHERE WAS A CORRESPONDING 

PARITY MEMORY AREA FOUNOi OR 
id) A POSSIBLE HOLE IN MEMORY EXISTS BECAUSE WE TIMED 

OUT BEFORE REACHING THE SUPPOSED SYSTEM MAXIMUM 

CORE LOCATION 

7.8 HLT +10 

DIDN'T ABURT OR RECOGNIZE STACK VIOLATION 
PROGRAM HegistER EXPECTED 
PC UNDER TEST ABORT PC 
** APPROPRIATE VALUES ** 

7.9 HLT +U 

ABORTED BUT STACK VIOLATION NOT RfcCOGNIZED 
PROGRAM REGISTER 

PC UNDER TEST 
** APPROPRIATE VALUES ** 

7.10 HLT +13 

STACK VIOLATION PICKED UP BUT ABO^T NOT RECOGNIZED 
PROGRAM KeGISTER 

PC UNDER TEST 
** APPRO^'RIATE VALUES ** 

8, RESTRICTIUNS 

AS MENTIONED IN PARAGRAPHS I AND ^.3, THIS PROGRAM DOES NUT 
TEST MEMORY, IT TESTS THE PROCESSUR. IF PARITY MEMORY CHtCKING 
IS WHAT YUu are AFTER THEN RUN M AlNDEC-1 1-DCMFA 

9, MISCELLANtOUS 

9.1 EXECUTION TIME 

ERROR FREt PASSES ARE ON THE ORDE« OF 1 OR 2 SECONDS 

9.2 PROGRAM TABLE LOCATIONS 

WHEN THE i>W<12> OPTION IS NOT USEU THE PROGRAM WILL FIND AtL 
PARITY CONTROL REGISTERS AND A CQKRESPONDING PARITY MEMORY LOCATION 
AND STORE THESE VALUES INTO A MAXIMUM 10 WORD. 4 COLUMN TABLE 
TO BE USEU BY THE PROGRAM FOR TESTING. IF, FOR EXAMPLE, <i PARITY 
CONTROL RtGISTERS AND PARITY MEMQKY AREAS ARE FOUND THEN PASS 1 OF 
THE PROGRAM WILL USE THE 1ST TABLt ENTRY INFORMATION? PAS» 2 
THE 2N0 TASUE ENTRY INFROMATIONr HaSS 3 BACK TO THE 1ST TABLE 
ENTRY INFUrmATION, ETC. 
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THE ABSOLUTE CORE LOCATIONS FOR TABLE ENTRYS ARE AS FOLLOWS! 

SREG0CLOCATION 1340) WILL CONTAIN THE 1ST PARITY REGISTER 

LOCATION 1348 UP TO 1364 WILL CONTAIN ANYMORE 
RtGISTERS FOUND 

$TMP0CLOCATION 1366) WILL CONTAIN A PARITY MEMORY LOCATION 

CORRESPONDINis TO THE REGISTER IN SRE^S 

Ll^CATION 1370 UP TO 1412 will CONTAIN THE CORRESPONDING 
MMORY parity LOCATIONS FUR THE OTHER REGISTERS 

$SET0CLOCATION 1480) WILL CONTAIN THE OFFSET VALUE TO BE USED 

WITH THE CORKESPONOING VALUE IN STMPW 

LOCATION 1423 UP TO 1444 WILL CONTAIN THE CORRESPONDING 
OFFSET VALUES FOR THE OTHtR REGISTERS. 

NTER0CLOCATION 1450) WILL CONTAIN THE INTERLEAVE FACTOR TU BE USED 

WITH THE PARITY REGISTER IN $REG0 

Lt^CATION 1452 UP TO 1474 WILL CONTAIN THE CORRESPUNDING 
If^TERLEAVE FACTORS FOR THt OTHER REGISTERS 



9,3 PROGRAM TABLE SET UP WITH KTll ENABLED 

IF A KTll OPTION IS PRESENT AND I5> NOT DISABLED THRU USER 
SETTING OF SW<06> (SEE PARAGRAPH ^>.), THE PROGRAM TABLE L^^CATIONS 
AND CONTENTS WILL APPEAR AS DESCRIBED AND SHOWN IN THE EXAMPLE 
BELOW, 



given: 


AJ 172100 


GOVERNING 0- 


8K MOS MEMORY 








BJ 172102 


GOVERNING 8- 


16K CORE 


MEMORY 








rJ 172112 


GQVERNING 40 


.ziAK CORE 










RtGISTER 




MtMORY 




OFFSET 


ILEAVE 


LOC, 


COLUMN 


LOC, 


CULUMN 


LOC. 


COLUMN 


COLUMN 


1340 


1^2100 


1366 


2^700 


1420 


140 


2 


1342 


172102 


1370 


2^700 


1422 


200 


2 


1344 


1^^2112 


1372 


2^700 


1424 


250fci 


1 



1346 

notes: Ci) WHEN THE KTll IS ENABLED THE MEMORY COLUMN CONTENTS 
WILL ALWAYS BE THE SAME BASE ADDRESS. 
(UNLESS WE HAVE MEMORY INTERLEAVING) 
(«2) 23700 IS A PAGE 1 ADOWESS AS SEEN BY THE KTIL 

THIS VIRTUAL ADDRESS AND iTS' CORRESPONDING OFFSET VALUE 
WILL GIVE THE PHYSICAL ADDRESS AS FOLLOWS: 
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VIRTUAL ADDRESS s 2 3 7 

♦ OFFSET VALUE » 1^0 



PHYSICAL ADDRESS" 17 7 

NUTICE that the offset VAl-UE IS TO BE SHIFTED TWILE 

TU THE LEFT AND THE LEFTMUST DIGIT OF THE VIRTUAL ADDRESS 

TU BE IGNORED BEFORE ADDING, 

(^) THE PHYSICAL ADDRESS VALUE FROM ABOVE IS THE VALUE 

USED BY THE 'COMPUT' HQUTINE CSEE PARAGRAPH 6*5) WHICH 
WILL DROP THE PHYSICAL ADDRESS DOWN SO AS NOT TO DESTROY 
THE ,ABS LOADER (I.E. - 376 IS SUBTRACTED) THUS GIVING A 
PHYSICAL ADDRESS FOR THE 2 LOCATION MAP 
CREATION AND TESTING, THIS VALUE 

IS ALWAYS PRESENT IN Kl, (GENERAL PURPOSE REGISTER 13 
C^) THE ZERO IN THE LAST REGISTER COLUMN LOCATION IS THE 

PROGRAM TABLE TERMINATION INDICATOR 
W A IN THE ILEAVE cOlUMN MEANS NO INTERLEAVING 

A '2' IN THE ILEAVE CULUMN MEANS 2-WAY INTERLEAVING 

* 

ETC. CUP TO 8-WAYD 



PROGRAM TABLE SETUP WITH KTll DISABLED 

IF A KTll OPTION IS PRESENT AND It> DISABLED THRU USER SETTING 
OF SW<06> CSEE PARAGRAPH 5.) OR NO KTll OPTION IS PRESENT 
THEN, THE PROGRAM TABLE LOCATIONS AND CONTENTS WILL APPEAK AS 
DESCRIBED AND SHOWN IN THE EXAMPLt BELOW, 



GIVEN! AJ mim GOVERNING 0-8K MOS MEMORY 

BJ 172102 GOVERNING 8-16^ CORE MEMORY 



REGISTER 
LQC, COLUMN LOC, 

1340 r'2100 1366 
1342 1'2102 1370 
1344 



MfcMORY OFFSET ILEAVE 

COLUMN LOC. COLUMN COLUMN 

1^700 1420 I 

2^700 1422 1 



notes: CO THE MEMORY COLUMN LOCATION CONTENTS ARE THE ALTUAL 

VALUES USED BY THE ^CUMPUT* ROUTINE (SEE PARA^iRAPH 6,5) 
id) THE OFFSET COLUMN CONSENTS ARE NOT IN AFFECT 

UNLESS THE KTll IS ENABLED (SEE PARAGRAPH 9,3J 
ii) THE ZERO IN LOCATION 1344 WOULD BE THE PROGRAM TABLE 

TERMINATION INDICATOR. 
(43 A IN THE ILEAVE CULUMN MEANS NO INTERLEAVING 

A '2' IN THE ILEAVE COLUMN MEANS 2-WAY INTERLEAVING 



ETC, CUP TO 8-WAY) 
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9.5 STACK POINTER 

THE STACK IS INITIALLY SET TO IT WILL REMAIN THIS VALUE 

FOR ALL TtSTS NOT DEPENDENT ON THt STACK BEING IN PARITY MEMORY 
AREA. fOH EXAMPLE, A TEST CHECKING FOR A PARITY ABORT ON THE 1ST 
'POP' FROM AN 'RTI' INSTRUCTION WUULD REQUIRE THE STACK TU BE IN 
THE PARITY MEMORY AREA CONTROLLED BY THE REGISTER UNDER TtST, 
IN THIS CASE THE STACK POINTER IS REPOSITIONED AND INITIAUIZED 
TO THE iS- ADDRESS OF THE 2 LOCATION MAP SET UP BY THE ^CUMPUT^ 
ROUTINE Ci>Et PARAGRAPH 6.5), 

FOR EXAMPLE, CONSIDERING THE 2N0 FABLE ENTRY GIVEN IN PARAGRAPH 
9,4, THE 'COMPUT' ROUTINE WOULD StT UP A 2 LOCATION MAP STARTING 
AT LQCATIUN 23302, THE STACK POINTER, FOR PERTINENT TESTS 
MENTIONED ABOVE, WOULD THEN BE REINITIALIZED TO 23302, 

NOTE: BtwAREi IF A KTU OPTION IS PRESENT AND ENABLED AND YOU 
wiSH TO EXAMINE THE CONTENTS OF THE STACK CAFTER A TEST 
RtQUIRING THE STACK TO BE REPOSITIONED ABOVE 8K HAS BEEN 
EXECUTED) THE STACK WOULD NOT-NOT-NOT BE AT 23302 USING 
TMIS EXAMPLE, IT WOULD Bt AT 17302 BECAUSE OF AN OFFSET 
VALUE. SEE THE PHYSICAL ADDRESS CALCULATION EXPLANATION 
UNDER PARAGRAPH 9,3. 

9.6 MAINTENANLE hint 

THE FOLLOWING SHOULD BE USEFUL INl-ORMATION FOR 11/45 USERS WHO 
WISH TO EXAMINE A TEST TO ASCERTAIN STEP BY STEP WHAT THE TEST 
DID. THE FOLLOWING INFORMATION PKESUMES THAT THE USER HAS ACCESS 
TO A MAINTENANCE BOARD, 

CI) MAKINb SURE THAT THE PARITY REGISTER CONTROLLING THE LOWER 
4K DQtS NOT HAVE BIT02 SET, PKQCtED TO DEPOSIT A IN^O THE 
CORE LOCATION QF THE 'SCOPE' fi»TATEMENT AT THE BEGINNING OF 
THE TfcST. 

KCJ LU«u ^Mimcoo C(£i«u loti I iixu om<*.*c^ ir ucoincuj «ww nil « i air i 
C3) THE PROGRAM WILL HALT AT THE LORE LOCATION USED IN (U ABOVE 
C4) PUT THE 'SINGLE INSTRUCTION' AND 'SINGLE BUS CYCLE' SWITCHES 

ON THt PROCESSOR CONSOLE DOWN 
C5) HIT THE CONTINUE SWITCH REPEAlEOLY UNTIL THE ADDRESS UF THE 

INSTRUCTION THAT U<AS TO CAUSE THE PARITY ABORT APPEARS IN THE 

ADDRESS LIGHTS. 

C6) SET THE DATA DISPLAY SELECT KNOB TO DISPLAY THE CPU MiCROSTATE 
IN BITS 7-0. 

(7) LOOKING AT THE MAINTENANCE BOARD, RIGHT SIDE UP, AND TOGGLE 
SWITCHES ON THE WIGHTl PRESS THE BOTTOM RIGHTMOST SWITCH 
TO THt RIGHT, 

C8) THEN JUST LIGHTLY TAP THE BOTTOM LEFTMOST SWITCH (JUST ENOUGH 
FOR IT TO BOUNCE BACK) REPEATtDLY, THE MICROSTATES WiLL 
BE DISPLAYED IN BITS 7-0 OF THE CONSOLE DATA REGISTER 

C9) THE MiCROSTATE VALUE THAT WAS IN THE CONSOLE DATA REGISTER JUST 
BEFORt IT TURNED WAS THE ABURT MICROSTATE, 



P*GE 14 



10, PROGRAM DtSCRIPTIQN 

THE MAIN tlUNCTION OF THIS PROGRAM IS TO TEST THE ABILITY OF A 
PARITY CONTROL REGISTER TO INTERFACE PROPERLY WITH ITS COKRESPONDING 
MEMORY PA><ITY AREA THUS ALLOWING f'ARITY ABORTS ON CPU EXECUTION OF 
DATI AND UATIP INSTRUCTIONS SET WITH ^NOT NORMAL' CBAD^ PARITY, 
BASIC COMbiNATIONS OF SOURCE AND UESTINATION MODES ARE TESTED 
TO PICK UP ALL POSSIBLE MICROSTATtS AT WHICH PARITY ABORTS CAN 
OCCUR. ALSO TESTED ARE SUCH THING'S AS: 

CA) 1ST AND aNO 'POP* ON A MARK INSTRUCTION 

m THE SOB INSTRUCTION 

CCD A 'MOV SM0,DM0* INSTRUCTION 

CD) THE '^OP' ON AN RTS INSTRUCTION 

CE) 1ST AND 2ND 'POP' ON AN RTI INSTRUCTION 
CFD PS AN PC FETCH INSTRUCTIONS 

CG] INDEXED WORD INSTRUCTIONS CDM^ # DMT , SM6) 

CHD CONDITIONAL BRANCH NOT OK INSTRUCTIONS 

CI) STACK VIOLATIONS IN *RED' AND 'YELLOW' ZONES 

THIS PROGRAM USED IN CONJUNCTION WITH MAINOEC-l 1-DCMFA 
SHOULD PROVIDE A PRETTY THOROUGH lEST OF PARITY, 

10.1 PROGRAM FLOW DIAGRAM 
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OCKBRE.Pll T*BLE OF CONTENTS 



163 


TVPF OnilTTMP 




218 








PDDriD DnTMTFD TABLE 




376 






429 


COMMON PARITY VARJIABLES AND 


FLAGS 


464 


CPU PARITY TEST MAIN FLOW 




2915 


END OF PASS ROUTINE 




2941 


SCOPE ROUTINE 




2998 


ACCEPT OCTAL NUHBtR FROM THE 


TTY 


3048 


TTY INPUT ROUTINE 




3099 


HLT (ERROR) ROUTINE 




3235 


BINARY TO OCTAL (ASCII) AND 


TYPE 


3306 


TRAP HANDLER 




3325 


POWER DOWN AND UP ROUTINES 
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2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
IS 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 



177776 



1/7570 
li'7570 



011)0001 
01^0002 
0^0003 
01^0004 
0U0005 
000006 
0U000T 



111)0000 



.TITLE MAINDEC-U-DCKBR-t 

jtOPYRIGHT 1973 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 
II^ROGRAH BY BRUCE BURGESS 



fUPERATIONAL SWITCH SETTINGS 
I 

I SWITCH 
f 
t 
I 
f 
f 
t 
f 
1 
t 



USE 



8 



H*LT ON ERROR 
LOOP ON TEST 
INHIBIT ERROR TYPEOUTS 
INHIBIT ITERATIONS 

- BELL ON PASS COMPLETE 

1 BELL ON ERROR 
LOOP ON ERROR 
LOOP ON TEST IN SW<7:0> 

^SPECIAL USER TYPt SWITCH SW<12> 
I 

HF SET INDICATES USER INPUT 
IIF CLEAR INDICATtS PROGRAM FIND 

ISPECIAL KTU DISABLE SWITCH SW<06> 

» 

tlf SET INDICATES DON'T USE IF PRtSENT 
rIF CLEAR INDICATES ALLOW USE IF •'RESENT 



(BASIC DEFINITIONS 
|*«#«««##««#«« 



jiNITlAL ADDRESS OF THE STACK POINTER 
SUCK* 1100 



.tQUIV EMTfHLT 
.tQUIV lOTfSCOPE 
PS. 177776 
.tQUIV PS,PSW 
SWR» 177570 
D^SPLAY'SWR 



JXEGISTER DEFINITION 



RU« 

Rl* 

ftdm 

RJ« 

R4« 

RS« 

R6a 

R/« 

.tQUIV 

.tQUIV 



X0 
XI 
X2 
X3 
X4 
X5 
X6 
XT 

R6,SP 
BT.PC 



IBASIC DE^'INITION OF ERROR CALL 
IBASIC DE^'INITION OF SCOPE CALL 
(PROCESSOR STATUS WORD 

ISWITCH RtGISTER 



(GENERAL REGISTER 

(GENERAL REGISTER 

(GENERAL XEGISTER 

(GENERAL HE6ISTER 

(GENERAL HegISTER 

(GENERAL REGISTER 

(GENERAL REGISTER 

(GENERAL MEGISTER 
(STACK POiNTER 

(PROGRAM i^OUNTCR 



(SWITCH DEFINITION 
3H15* 100000 







nrvKBF PI f 




5S 




S6 


Anna 


57 


Rl not 0101 


58 


010 Ji Ann 


59 




60 




61 


B W (0 10 


62 




63 






0*^0040 


65 








67 


W ■* W •£» If 


66 


0iif}0002 


69 












72 








74 




75 




76 




77 




78 








80 




81 






1 •'BIO WW 


83 


W . w 


64 


0'*0000 


85 


10 A to 10 (£110 


86 


004000 


87 


002000 


86 




89 




90 




91 


©■'B 1 1910 


92 


000040 


93 




9fl 




95 


000004 


96 


000002 


97 


i30000 1 


96 




99 




100 
101 




1 02 




1 33 




104 




105 




106 




107 




106 
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St*14a 
S«<13» 
3N12a 
SN|1> 
SNiea 

SM0aa 
SM07a 

S««06a 

swesa 

SMBAa 
SMe3a 

swesa 

SH01a 

swaea 

.tQUIV 
.feQUIV 
.tQUIV 
.tQUIV 
.tQUIV 

.touiv 

.tQUIV 

.tsuiv 

.tQUIV 
.tQUIV 



40000 

80000 

10000 

4000 

2000 

less 

400 
200 
100 
40 

20 

le 

4 
2 
I 

SM09,SW9 
SM08,SW8 
SM07,SW7 
SM06,3Wfc 
SM05,SM5 
SW04,SM4 
SM03,SM3 
SW02,SW£ 
S|il01,SMl 
SW00,SM0 



>"ISCEtU*NEOUS BIT ASSIGNMENT 



BiTlSa 


100000 


BiT14a 


40000 




BlTl3a 


20000 




BlT12a 


10000 




BATlla 


4000 




BiTl0a 


8000 




BiT09a 


1000 




BiTSSa 


400 




BlT07a 


800 




8iT06a 


100 




BiT05a 


40 




BlT04a 


20 




SiT03s 


13 




BlT02a 


4 




BlT01a 


2 




BlTOBa 


1 




.tQUIV 


B1T09, 


,BIT9 


.tQUIV 


BIT06, 


,BIT8 


.tQUIV 


BIT07, 


,BIT7 


.tQUIV 


BIT06, 


,BIT6 


.touiv 


BIT05, 


,8IT5 


.tQUIV 


aiT04, 


,BIT4 


.tQuiV 


BIT»3, 


.aiTi 


.tQUIV 


BIT02, 


,8IT8 


.tQUIV 


BITei, 


rBITl 


.tQUIV 


BIT00, 


iBIT0 
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189 
110 
111 
112 
113 
114 
115 
116 
UT 
118 
119 
180 
181 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
15"! 
156 
157 
158 
159 
160 
161 
162 



000046 
000058 



000804 
000206 



000210 
000212 
000214 
000216 
000220 
000882 
000224 
000826 



000230 
000232 
000234 
000a36 
000840 
000842 



01110004 
000010 
000014 
0'900t4 

00001a 
0>D0020 
0I»0024 
000030 
0li90034 
0i!)0001 



000000 



000200 

000137 

0140046 
012048 
000058 



000204 



1'7572 
l'7576 



1/2300 
1^2308 
1?8304 
1^2306 
1^8310 
178312 
1'8314 
l''8316 



r'8340 
li'2348 
!'2344 

ii'a346 

1^2350 
1^8358 
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(VECTOR ADDRESSES 
EKRVECa 4 
RtSVECa 10 
TBITVECal4 
T»<TVECa 14 
BI*TVECa 14 
lOTVECa 80 
PwRVECa 24 
EITVECa 30 
TKAPVECa34 
Nal 



.>0 



FOEFINE SURTING 'N* FOR, SCOPE 
(ROUTINE "HICH PRINTS TEST NO. 
lAND APPRUPRIATE COMMENT 



lIRAP CATCHER IN UNUSED UUCATIONS FROM - 776 
fCOCATION WILL CATCH IMKROPERLT LOADED VECTORS 



JMP ••BEGIN 

.a46 

SENDAO 

.a52 

BIT14 



.a2e4 

>KTll-0 STATUS REGISTER AUDRESSES 



lJUMP TO STARTING ADDRESS OF PROGRAM 



SK0: 
SK2I 



177572 
177576 



;RERNAL PAGE DESCRIPTOR RtQISTERS 



KKDR0S 
Ki^DRll 
K^'0R8l 
KKDR3I 
K?DR4l 
KH0R5I 
KK0R6I 
KI'ORTJ 



K^'AR0l 
KKARH 
HILARS: 
itPARSl 
K»^AR4I 
KKAR5I 



178300 
178308 
178304 
178306 
172310 
178312 
178314 
178316 

178340 
178348 
178344 
178346 
178350 
178352 
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163 000244 l7a3S4 K^AR6I 172354 

164 000246 172356 Kl'AR7l 172356 
165 

166 fKTU VECTOR ADDRESS 

167 

16a 000250 000250 000252 StGVECI 250(252 
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l6s 
170 
171 
172 
173 
174 
175 
176 
177 
178 
179 
160 
181 
162 
1S3 
184 
165 
186 
187 
168 
169 
190 
191 
192 
193 
194 
195 
196 
197 
196 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 



0^1100 



.■1100 

»«OUTINE TO TYPE ASCII MESSAGE, MESSAGE MUST TERMINATE WITH A BYTE, 
|tHE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTtRS AFTER A LINE FEED, 
fNOTEll SNULL CONTAINS THt CHARACTER TO BE USED A» THE FILLER CHARACTER. 
»N0TE2I SFILLS CONTAINS TME NUMBER OF FILLER CHARACTERS REQUIRED. 

;l^ALL: 

|i) USING A TRAP INSTRUCTION 
» TYPE ,MESADR 

fUR 

I TYPE 
t MESADR 



FMESADR IS FIRST ADDRESS OF AN AS^^IZ STRING 









;^) USING A JSR 


INSTRUCTION 










1 


MOV 


PS,-(SP) 


fPUSH PROCESSOR STATUS WORD ON THt STACK 








; 


JSR 


PC, STYPE 


»CALL TYPt ROUTINE 








1 


mesaddr 




;first ad«ess of message 


001100 


1?7564 




sips: 


177564 




>TTY PRINIER STATUS REG. ADDRESS 


001102 


177566 




stpBi 


177566 




ITTY PRINTER BUFFER REG. ADDRESS 


001104 


000 




SNULL : 


.BYTE 





ICONTAINS NULL CHARACTER FOR FILLS 


001105 


002 




SflLLSl 


.BYTE 


2 


^CONTAINS # OF FILLER CHARACTERS ^EOUIREO 


001106 


000 




stpflg: 


.BYTE 





••TERMINAL AVAILABLE" FLAG (0«YESJ 


001107 


000 






.BYTE 





•RESERVED 


001110 


1M5767 


177772 


stype: 


TSTB 


STPFLG 


IIS THERE A TERMINAL? 


001114 


0101402 






6EQ 


6S 


IBR IF YES 


001116 


000000 






HALT 




fHALT HERt IF NO TERMINAL 


001120 


000407 






BR 


TS 


(LEAVE 


001122 


010046 




6»: 


MOV 


R0,-CSP) 


ISAVE RO 


001124 


017600 


000002 




MOV 


#2CSP) ,R0 


IGET ADORtSS OF ASCIZ STRING 


001130 


112046 




1»» 


M0V8 


(R0)*,-(Sf) 


»PUSH CHANACTER TO BE TYPED ONTO STACK 


001132 


0<dl005 






BNE 


2S 


»BR IF IT ISN'T THE TERMINATOR 


001134 


005726 






TST 


(SP)* 


MF TERMINATOR POP IT OFF THE STAtK 


001136 


012600 






MOV 


CSP)*,R0 


•RESTORE K0 


00114CI 


062716 


000002 


7»> 


ADD 


«2, CSP) 


•ADJUST RtTURN PC 


0I!I1144 


000002 






RTl 




•RETURN 


001146 


0(94767 


000026 


2»i 


JSR 


PC.SS 


•GO TYPE THIS CHARACTER 


001152 


122726 


000012 


3»: 


CMPB 


#12, (SP) + 


•CHECK IF THE CHAR. TYPED WAS A LINE FEED 


001156 


0101364 






BNE 


IS 


•GO GET NtXT CHAR, IF NOT LINE FEtD 


001160 


016746 


177720 




MOV 


SNULL, -(SP) 


•GET # OF FILLER CHARS. NEEDED 














•AND THE NULL CHAR. 


001164 


105366 


000001 


4St 


DECB 


KSP) 


•DOES A NULL NEED TO BE TYPED? 


001170 


0B2770 






BLT 


3S 


•BR IF ND--GO POP THE NULL OFF OF STACK 


001172 


0B4767 


000002 




JSR 


PC,5S 


•GO TYPE * NULL 


001176 


06)0772 






BR 


4S 


• LOOP 


001200 


11115777 


177674 


5»: 


TSTB 


• STPS 


•WAIT UNTIL PRINTER IS READY 


001204 


1100375 






BPL 


5S 




001206 


116677 


000002 


177666 


MOVB 


atSP) (PST^B 


•LOAD CHA« TO BE TYPED INTO DATA KEG, 


001214 


0100207 






RTS 


PC 




001216 


000062 






• BLKB 


62 


•RESERVE SOME MORE CORE FOR OVERLAY CAPIBILITIES 



HAIND£C>tl»DCKPR.t 
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ass 

224 



I********************************************************************** 









ftOMMON 


TAGS 






226 














227 




01^1300 




.■1300 






Z2S 














229 


zeiiee 


011)0000 


S^ASSS 


.MORO 





ICONTAINS PASS COUNT 


230 


eei302 


0110000 


STSTNMI 


.MDRO 





ICONTAINS THE TEST NUMBER 


231 


SB13B4 


ekie000 


$iCNTS 







fCQNTAINS SUBTEST ITERATION COUNT 


232 


201306 


000000 


SUPADRI 


.WORD 





ICONTAINS SCOPE LOOP ADDRESS 


233 


eeisie 


01^0000 


Sl-PERRI 


.MORD 





ICONTAINS SCOPE RETURN FOR ERRORS 


234 


001312 


0110000 


StRTTUI 


.WORD 





ICONTAINS TOTAU ERRORS DETECTED 


235 


001^14 


000 


StRFLG: 


.BYTE 





ICONTAINS ERROR FLAG 


236 


001315 


000 




.BYTE 





IRESERVEO--NOT TO BE USED 


237 


001316 


0)10000 000000 




.MORD 


0,0 


IRESERVEO--NOT TO BE USED 


238 


001322 


000 


SITEMB: 


.BYTE 





ICONTAINS ITEM CONTROL BYTE 


239 


001323 


000 




• BYTE 





IRESERVED--NOT TO BE USED 


240 


001324 


0i30000 


$hltad: 


.WORD 





ICONTAINS PC OF LAST HLT INSTRUCTION 


241 


001326 


000000 


SbOADRt 


.WORD 





ICONTAINS ADDRESS OF 'GOOD' DATA 


242 


001330 


0110000 


SUDADR: 


.WORD 





ICONTAINS ADDRESS OF 'BAD' DATA 


243 


001332 


000000 


»l«DDAT: 


.WORD 





ICONTAINS 'GOOD' DATA 


244 


001334 


000000 


S0DDAT: 


.WORD 





ICONTAINS 'BAD' DATA 


245 


001336 


0(10000 


JKEGAOJ 


.WORD 





ICONTAINS THE ADDRESS FROM 


246 












IWHICH C»REG0) WAS OBTAINED 


247 


001340 


000000 


SKEG0: 


.WORD 





ICONTAINS CCSREGADJ+O) 


24S 


001342 


0110000 




.WORD 





ICONTAINS CCSREGAD}'»2] 




001344 


aOaaaa 




.WORD 







iso 


001346 


0110000 

0(90000 




.WORD 





ICONTAINS CCSRE6AD)«6) 


251 


001350 


SKEG4e 


.WORD 





ICONTAINS CCSREGADJ^IO) 


252 


001352 


000000 


IKEGSt 


.WORD 





ICONTAINS CCSREGA0)'*-12) 


253 


001354 


000000 


SMEG6I 


.WORD 





ICONTAINS (CSREGAD}+14] 


254 


001356 


000000 


$NEG7t 


.WORD 





ICONTAINS C(SREGAD)f 16} 


255 


001360 


000000 


SKEG10t 


.WORD 





ICONTAINS CCSREGAD)*20} 


256 


001362 


0110000 


SHEGllt 


.WORD 





ICONTAINS CCSREGAD3+22) 


257 


001364 


000000 


SMEG12t 


.WORD 





ICONTAINS C(SREGAD)4'24) 


258 


001366 


000000 


SVHP0: 


.WORD 





lUSER DEFINED 


259 


001370 


0110000 


siMpi : 


.WORD 





lUSER DEFINED 


26(1 


001372 


000000 


siMpa: 


.WORD 





lUSER DEFINED 


261 


001374 


000000 


sfMP3i 


.WORD 





lUSER DEFINED 


262 


001376 


000000 


STMPa: 


.WORD 





lUSER DEFINED 


263 


001400 


000000 


S1MP5I 


.WORD 





lUSER DEFINED 


26a 


001402 


000000 


$1MP6: 


.WORD 





lUSER DEFINED 


265 


001404 


000000 


$1MP7I 


.WORD 





lUSER DEFINED 


266 


001406 


000000 


$IMP10: 


.WORD 





lUSER DEFINED 


267 


001410 


000000 


stmpui 


.WORD 





lUSER DEFXNEO 


266 


001412 


000000 


1TMP12: 


.WORD 





lUSER DEFINED 


269 






1 IHE FOULQMING 


TAG(S) ARE USER DEFINED 




270 


001414 


9110000 


SIMPAO! 


.WORD 







271 


001416 


0110000 


S^ETAO! 


.WORD 







272 


001420 


000000 


$SET03 


.WORD 





ITHE8E LOLATIONS CONTAIN THE 


273 


001422 


0110000 


$i»ETl: 


.WORD 





lAPPROPRIATE OFFSET VALUES 


274 


001424 


000000 


ISET2: 


.WORD 





IFOR THE PARITY CONTROL 


275 


001426 


000000 


$!>ET3S 


.WORD 





IREGISTER» WHEN MEMORY 


276 


001430 


0tl0000 


Si>ET4l 


.WORD 





IHANAGEHENT IS ENABLED 



HAINDEC-U-DCKBR-t 
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DCKBRC, 


,P11 


COMMON TAGS 








277 


831532 


000303 


SSET5: 


.WORD 


3 


278 


001434 


000000 


SiiET6l 


.WORD 





279 


001436 


000000 


$!>ET7: 


.WORD 





280 


001440 


000000 


Si>ET10i 


.WORD 





281 


001442 


000000 


SiiETltl 


.WORD 





282 


001444 


000000 


JSET12: 


.WORD 





283 


001446 


000000 


NiERADi 


.WORD 





284 


001450 


000000 


NiER0l 


.WORD 





265 


001452 


000000 


NIERll 


.WORD 





286 


001454 


000000 


NtER2l 


.WORD 





287 


001456 


000000 


NiER3l 


.WORD 





288 


001460 


000000 


NiER4l 


.WORD 





289 


001462 


000000 


nTersi 


.WORD 





290 


001464 


000000 


NIER6I 


.WORD 





291 


001466 


000000 


NfEHTI 


.WORD 





292 


001470 


000000 


N1ER10: 


.WORD 





293 


001472 


000000 


NTERIU 


.WORD 





294 


001474 


000000 


nIeR12I 


.WORD 





295 


001476 


000000 


nEwstk! 


.WORD 





296 






ItNO OF 


USER DEFINED 


297 













ITHESE LOCATIONS CONTAIN THE 
lAPPROPRIATE INTERLEAVE FACTORS 
IFOR THE *'ARITY CONTROL 
|REGI8TEH» CIF ANY) 
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ERROR POINTER TABLE 



39S 






299 






300 






3B1 






302 






303 






304 






305 






306 






307 






308 






309 






310 


001500 




311 






312 






313 






314 


001500 


013752 


315 


001502 


015005 


316 






317 






318 


001504 


015142 


319 


001506 


01^0000 


3S0 






321 


001510 


013776 


322 


001512 


014470 


323 






324 


001514 


015106 


325 


001516 


000000 


326 






327 


001520 


014027 


328 


001522 


014604 


329 






330 






331 






332 






333 






334 


001524 


015124 


335 


001526 


0i90000 


336 






337 


001530 


014055 


338 


001532 


014540 


339 


001534 


0151 14 


340 


001536 


000000 


341 






342 


001540 


014120 


343 


0(?1542 


014470 


344 






345 


001544 


015106 


346 


001546 


000000 


347 






348 


001550 


014145 


349 


001552 


014566 


350 


001554 


015120 


351 


001556 


000000 



llHE FOLLOWING TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR, 

;?HIS INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

fLOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINtNT. 

JNOTEII IF JITEMB IS THt ONLY PERTINENT DATA IS tSMLTAD). 

;N0TE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWSl 



IPOINTS TO THE ERROR MESSAGE 

;H01NTS TO THE DATA HEAOEM 

r^OINTS TO THE DATA 

JK'OINTS TO THE DATA FORMAl 



S^RRTB t 

|NOTE! ALL NUMBERS ARE TTPED AS 6-DIGIT OCTAL NUMBERS 



MTEM I 



EMI 
DH5 



(ITEM a 



EM2 
DHl 



;1TEM 3 



EM3 
DH4 



JITEM 4 



JITEM 5 



rITEM 6 



0T4 



EM4 

DH2 
DT2 



EMS 
DHl 

DTI 


EM6 
DH3 
DT3 



fTEST DIDN'T ABORT 
(PROGRAM rc 
(REGISTER UNDER TEST 
(EXPECTED ABORT PC 
($HLTAD,P*R1TY,$GDDAT 



(FATAL ERHOR TO PROGRAM 
(PROGRAM fC 
(REGISTER UNDER TEST 
(SHLTAD, f'ARITY 



(ABORTED INCORRECTLY 
(PROGRAM KC 
(REGISTER UNDER TEST 
(EXPECTED BITS 5 THRU 11 
(ACTUAL BITS 5 THRU 11 
(EXPECTED ABORT PC 
(ACTUAL ABORT PC 

(SHLTAD, PARITY. SGOADR,$BOADR,$GOD*T,$BDDAT 



INO PARITY MEMORY FOUND BELOW 2BK 

(REGISTER UNDER TEST 

(PARITY 



(RESET OOtSN'T WORK 
(PROGRAM rc 
(REGISTER UNDER TEST 
(SHLTAD, fARITY 



(USER SELECTED REGISTER NOT PRESENT 

(PROGRAM 

ISHLTAD 
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DCKBRE, 


,P11 




ERROR POINTER TABLE 






352 






(ITEM 


7 




353 


001560 


014212 




EM7 


(NO PARITY MEMORY FOUND AT ALL 


354 


001562 


0U540 




DH2 


(REGISTER UNDER TEST 


355 


001564 


015114 




DT2 


(PARITY 


356 


001566 











357 






(ITEM 


10 




358 


001570 


014252 




EM10 


(DIDN'T ABORT OR RECOGNIZE 


359 










(STACK VIOLATION 


363 


001572 


015005 




DH5 


(PROGRAM >'C 


361 










(REGISTER UNDER TEST 


362 










(EXPECTED ABORT PC 


363 


001574 


015142 




DT5 


(SHLTAD, MARITY, SGDOAT 


364 


001576 


0ii0000 









365 






(ITEM 


11 




366 


001600 


014326 




EMU 


(ABORTED BUT STACK VIOLATION 


367 










(NOT RECOGNIZED 


368 


001602 


014470 




DHl 


(PROGRAM ^C 


369 










(register'under test 


370 


001604 


015106 




OTl 


(SHLTAD, I^ARITY 


371 


001606 


000000 









372 






(ITEM 


12 




373 


001610 


014403 




EM12 


(STACK VIOLATION PICKED UP BUT 


374 










(ABORT NOI RECOGNIZED 


375 


001612 


014470 




DHl 


(PROGRAM HC 


376 










(REGISTER UNDER TEST 


377 


001614 


015106 




DTI 


(SHLTAD, fARlTY 


378 


001616 


0140000 










M*INDCC-U-DCK8B-t 
DCKBRE.PU 
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HELPFUL PROGRAM NUTE8 



379 

360 I***************************************************************** 

381 » 

362 ISYSTEM PARITY REGISTER NUTES FOR HFlt AND M3tl 

363 I 

364 I***************************************************************** 

365 

386 |HIT ASSIGNMENTS FOR THE «F11 PARITY REGISTER IS »8 F0UL0W8I 

367 I 

368 |BIT15 PARITY ER«OR 

389 IBITS il>S ERROR A0DKES3 >HlgH ORO^R A0DRES8 BITS 

390 »0F ADDRESS OF MOST RECENT ERROR 

391 >CBITS 17 THRU 11) 

392 IOIT02 WRITE INOBHAL P*R1TY (ODD) WHEN CLEAR 

393 »OTHER PAHITY (EVEN) WHEN SET 

39a ittiTee error action enable >no action when clear 

395 1 JTRAP TO VECTOR 114 WHEN SET 

396 I 

397 INOTEI THE ABOVE BITS ARE READ/WRITE AND CAN BE CLEARED BY 'INIT' (EXCEPT BITS 11 

398 » 

400 I 

431 >SIT ASSIGNMENTS FOR THE MSll PARITY REGISTER IS *S FOLLOWS! 

402 I 

403 »BIT15 PARITY ER^OR 

404 ft)ITe2 WRITE ^NORMAL PARITY (EVEN) WHEN CLEAR 

405 .'OTHER P»MTTV (nnn; uuru tcr 

406 |t)IT00 ERROR ACTION ENABLE >N0 ACTIQn'wHEN CLEAR 

487 ITRAP TO VECTOR »14 WHEN SET 

408 t 

409 »NDTEl THERE ARE NO ERROH ADDRESS BITS IN THE CUMRENT MSll PARITY REGISTtR 

410 I HOWEVER, THERE WILL BE IN A LATER VERSION WHICH WILL BE 

411 I HANDLED PROPERLY BY THIS PROGRAM 

412 t * * 

«!5 ' 

416 ;SPECIAL NOTE— -THERE ARt 2 GENERAL PURPOSE REGISTERS USED IN THE 

417 > PROGRAM »-0R SPECIFIC CIRCUMSTANCtS. THEY ARE« 
SIS t 

419 t Rl - WILL ALWAYS CONTAIN THE 18T ADDRESS OF THE 2 

420 I LOCATION MAP USED FOR TESTING. 

421 I THE CONTENTS OF Rl IS DETERMINED BY THE •COMPUT* 

422 t R0U1INE SHOWN FURTHER DOWN, 

423 » EXAMINATION OF Rl WILL TELL YOU WHERE IN PARITY 

424 I MEMORY TESTING IS BEING CONUUCTEO. 

425 t 

426 I R5 - WILL ALWAYS CONTAIN THE AODHESS OF THE ROUTINE 

427 I FOR SETTING UP THE PARITY VtCTOR SERVICE ADDRESS, 

428 t 
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431 
432 
433 
434 
435 
436 
437 
438 

439 001620 0«)0114 

440 001622 000000 

441 001624 01^0000 

443 
444 

445 001626 0(190000 
446 

447 001630 0U0000 

448 

449 

450 

451 001632 01^0000 

452 

453 

454 

455 

456 0«>1634 0iil0000 

457 

458 

459 

460 

461 

462 

463 

464 001636 0id0000 

465 

466 

467 001640 0il0000 
468 

469 001642 0il0000 

4T0 

471 

472 

473 

474 

475 001644 

476 001644 011)0003 000001 

477 001650 0190006 000002 

478 001654 011)0011 000003 

479 001660 000014 000004 
4S0 001664 gi^eaiT 0^00^5 
461 001670 000022 000006 
482 001674 000025 000007 

463 001700 000030 000010 

464 001704 eilsaaa 



{MISCELLANEOUS COMMON PARITY VARIABLES AND FLAGS 



INTVEC: 114 
PARITYI 
P*PCORZONES: 



M^REGFLAGi 
USEfiTYPEI 



BLKCNTi 



RtSTOREBASE: 



LtAFCNT: 

MtHAD: 
C^U40I 



FPARITY INTERRUPT VECTOR ADDRESS 

^CONTAINS PARITY REGISTER IN USE 

IFLAG TO INDICATE TO 'CHECKLOC* 

(ROUTINE IHAT A PS OR PC FETCH 

(OR A ZONt ABORT WAS DONE 

10 ■NO; I • YES 

(INDICATE* PARITY TYPE 

10 ■ CORE ( 1 ■ MOS 

I INDICATE* USER SELECTION OF 

(PARITY RtGISTER 

(0 ■ PROGMAM FIND 

(1 ■ USER SELECTION 

(CONTAINS THE NUMBER OF CONSEC- 

lUTIVE LOLaTIONS TO BE TESTED 

(DURING PMOGRAM TABULATION TO 

(COVER CASES OF MEMORY INTER- 

ILEAVING 

(HOLDS PAl>E I ADDRESS 

(OR CURRENT MEMORY ADDRESS FOR 

(RESTORATION DURING 

(RUNNING UF PROGRAM, IT IS USED IF 

(WE HAVE (CHECKED CONSECUTIVE 

(LOCATIONS WITHOUT AN ABORT BEFORt 

(GOING TO NEXT OFFSET WHICH WILL 

(PUT US IN ANOTHER BANK 

(CONTAINS THE NO, OF ABORTS 

(ENCOUNTEXEO IN DETERMINATION OF 

(AN INTERWEAVE FACTOR 

(CONTAINS A BASE ADDRESS OR A 

(CURRENT MEMORY ADDRESS USED IN 

(FLAG TO INDICATE PROCESSOR 

(0 * ll/4^( 1 ■ 11/40 

(PARITY TABLE CREATION 



(THE FOLLOWING TABLE IS USED TO DETERMINE THE 
(INTERLEAVE FACTOR FOR THt CONTROL REGISTERS 
INTERTABLE! 



3»l 
6r2 
9>,3 

15. ,5 
IS. ,6 
21. ,7 



}i ABORTS ON 3 CONSECUTIVt LOCS. ■ 

(i ABORTS ON 6 CONSECUTIVt LOCS. ■ 

fi ABORTS ON 9 CONSECUTIVE LOCS. ■ 

(i ABORTS ON 12 CONSECUTIVE LOCS, 

fi ABORTS ON 15 CONSECUTIVE LOCS, 

fi ABORTS ON 16 CONSECUTIVE LOCS, 

(i ABORTS ON 21 CONSECUTIVE LOCS, 

(j ABORTS ON ?4 CONSECUTIVE IOCS, 
;tN5 Sr TiSLE TcRnlNATQR 



1 WAY LEAVE 

2 WAY LEAVE 

3 WAY LEAVE 

■ 4 W»Y LEAVE 

■ 5 WAY LEAVE 

• 6 WAY LEAVE 

■ 7 WAY LEAVE 

• 8 WAY LEAVE 
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485 












486 


001706 






BtGINI 




48T 


001706 


012706 


001100 


MOV 


•STACK iSP 


488 


001712 


012737 


012062 000020 


MOV 


«SSCOPE,f*IOTVEC 


489 


001720 


012737 


000340 000022 


MOV 


• 340,f*iatvEC'»2 


498 


001726 


00S067 


177350 


CLR 


ST3TNM 


491 


001732 


012737 


012634 000030 


MOV 


•iHLT,»#EnTVEC 


492 


001740 


012737 


000340 000032 


HOV 


•340,*«EHTVEC+2 


493 


001746 


012737 


013556 000034 


MOV 


•STRAP, #«tRAPVEC 


494 


001754 


012737 


000340 000036 


MOV 


•340,»*TRApvEC+2 


495 


001762 


012737 


013606 000024 


MOV 


•SPHRDNff'PHRVEC 


496 


001770 


012737 


000340 000026 


MOV 


*340,f«PHMVEC'»2 


497 


001776 


005067 


177276 


CLR 


SPASS 


498 


002002 


0ID5067 


177276 


CLR 


SICNT 


499 


002006 


0III5067 


010276 


CLR 


STIMES 


500 


002012 


111)5067 


177276 


CLRB 


SERFLG 


501 


002016 


005067 


177270 


CLR 


SERTTL 


502 


002022 


005067 


010746 


CLR 


SESCAPE 


503 












504 


002026 


005037 


001630 


CLR 


••USERTYPt 


505 












506 












507 


002032 


0i«5037 


002304 


CLR 


••SKTU 


508 


002036 


005037 


001420 


CLR 


••SSETO 


509 


002042 


005037 


001422 


CLR 


««SSET1 


510 


002046 


005037 


001424 


CLR 


f«SSET2 


511 


002052 


005037 


001426 


CLR 


««SSET3 


512 


002056 


005037 


001430 


CLR 


f«SSET4 


513 


002062 


005037 


001432 


CLR 


•*SSETS 


514 


002066 


005037 


001434 


CLR 


»«SSET6 


515 


002072 


011)5037 


001436 


CLR 


••SSET7 


516 


002076 


005037 


001440 


CLR 


**SSET10 


517 


002102 


005037 


001442 


CLR 


*#SSET11 


518 


002106 


0III5037 


001444 


CLR 


f*$SET12 


519 


002112 


005037 


001450 


CLR 


f«NTER0 


520 


002116 


01^5037 


001452 


CLR 


•#NTER1 


521 


002 1 22 








••NTER2 


522 


002126 


005037 


001456 


CLR 


•#NTER3 


523 


002132 


005037 


001460 


CLK 


««NTER4 


524 


002136 


0B5037 


001462 


CLR 


••NTER5 


525 


002142 


005037 


001464 


CLR 


*«NTER6 


526 


002146 


005037 


001466 


CLR 


••NTER7 


527 


002152 


005B37 


001470 


CLR 


•#NTER10 


528 


002156 


005037 


001472 


CLR 


*«NTER11 


529 


002162 


0145037 


001474 


CLR 


##NTER12 


530 


002166 


005037 


001636 


CLR 


••LEAFCNT 


531 
532 


002172 


005037 


001642 


CLR 


#»CPU40 


533 


002176 


013746 


000004 


MOV 


•#4,-(SP) 


534 


002202 


013746 


000010 


MOV 


##1B,-(SPJ 


535 


002206 


012737 


002226 000010 


MOV 


*1S,««RESVEC 


536 


002214 


012737 


000340 000012 


MOV 


•340,*#RE!>yEC+2 


537 


002222 


000237 




SPL 


7 


538 


002224 


000403 




BR 


2$ 



JSETUP THt STACK POINTER 
riOT VECTUR FOR SCOPE ROUTINE 
ILEVEL 7 

MNITIALI^E THE TEST NUMBER 

lEMT VECTOR FOR HLT(ERROR) ROUTINt 

»LEVEL 7 

fTRAP VECTOR FOR TRAP CALLS 
ILEVEL 7 

IPOHER FAILURE VECTOR 
ILEVEL 7 

I CLEAR THt PASS COUNT 

UNITIALISE THE ITERATION COUNTER 

UNITIALISE NUMBER OF ITERATIONS 

ICLEAR THt ERROR FLAG 

ICLEAR THt ERROR COUNT 

ICLEAR THt ESCAPE ON ERROR ADDRESS 

ISET USER SELECTION INDICATOR 
ITO ZERO INDICATING PROGRAM 
ITABULATIUN 

ICLEAR KTll PRESENCE FLAG 
ICLEAR THt OFFSET 
ITABLE LQt^ATIONS FOR 
ITHE KTll OPTION 



ICLEAR THt INTERLEAVE TABLE 
lENTRY LOl^ATIONS 



ICLEAR NOi OF ABORTS PER NO, OF 
ICONSECUTlVE LOCS, TESTED FLAG 
ICLEAR PROCESSOR INDICATOR FLAG 
ISAVE CONTENTS OF LOC, 4 
ISAVE CONTENTS OF LOC, 10 
ISET UP FOR «SPL* TRAP ADDRESS 
ISET UP FOR 'SPL* TRAP PS 
lATTEMPT TO SET A PRIORITY LEVEL 
IBRANCH INDICATING WE ARE ON AN 
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CPU PARITY TEST 


539 








540 


002226 


0^2626 




541 


002230 


0li)5237 


001642 


542 








543 


002234 


012637 


000010 


544 


002240 


005037 


000012 


545 


002244 


012737 


002324 000004 


546 


002252 


012737 


000340 000006 


547 


002260 


005777 


175720 


548 


002264 


005077 


175714 


549 








550 


002270 


013700 


177570 


551 


002274 


006300 




552 


002276 


105700 




553 








554 








555 


002300 


100412 




556 


002302 


0^5327 




557 


002304 


000000 




558 








559 


002306 


004737 


013124 


560 


002312 


005077 


175712 


561 


002316 


011)5277 


175662 


562 


002322 


000401 




563 


002324 


0^2626 




564 








565 








566 


002326 


012637 


000004 


567 


002332 


0M5037 


000006 


56S 


002336 


004337 


011506 


569 


002342 


016703 


177046 


570 


002346 


016702 


176764 


571 


002352 


016700 


177040 


572 








573 








574 


002356 


016705 


177064 


575 








576 








577 








578 








579 








580 








581 








582 








583 








584 








585 








586 








587 








588 








589 








590 








591 








592 
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1»« 
2*1 



CMP 
INC 

HOV 
CLR 
MOV 
MOV 
TST 
CLR 

MOV 
ASL 
T8TB 



BMI 
DEC 
$^T11! 

JSR 
CLR 
INC 

KTTIMEOUTJ 



MOV 
CLR 
JSR 
MOV 
MOV 
MOV 



tSPJ+, CSPJ* 
*#CPU40 

CSP)+,##10 
f*i2 

•KTTIMEOUT ,»#ERRVEC 
*340,»»ERKVEC'*'2 

*SRe 

•SR0 

f«3MR,R0 

R0 
R0 



GO 

CPC3 + 



PC,»#SSIZt 
•KPAR0 
»SR0 

GO 

CMP Ci»P)*.tSP3 + 



• «6 

R3,»*INITIALIZE 
$TMPAD,R3 
$REGAD>R2 
SSETACRO 



NTEHAD,R5 



111/45 PROCESSOR 
IRESET THt STACK FROM TRAP 
ISET FLAG INDICATING WE ARE ON 
IAN 11/40 PROCESSOR 
IRESTORE 1.0NTENTS OF LOC. 10 
IRESTORE "TRlPCATCHER LOC. 12 
ISET UP K'r TIMEOUT ADDRESS 
ISET UP KI TIMEOUT PS 
IKTU ARE YOU THERE? 
lYES - INITIALIZE IT IN CASE 
lUSER DOESN'T WANT IT 
IGET SWR CONTENTS 
IMOVE BITifl6 TO BITOT POSITION 
IKTU PRESENT C0BVI0USLY3 IF 
IWE REACH THIS INSTRUCTION 
lOOES USEH WANT ITT 
IBRANCH If NO 
lYES - SET KTll FLAG 
ICONTAINS A -1 IF KTll OPTION 
IIS PRESENT 

I3EE HOW MUCH MEMORY IS AVAILABLE 
ICLEAR PAl»E OFFSET REGISTER 
I TURN ON MEMORY MANAGEMENT 
ISKIP NEXT INSTRUCTION 
IRESET THt STACK FROM TIMEOUT 
IKTU NOT PRESENT, THEREFORE 
lONLY 00 BELOW 2BK 
IRESTORE CONTENTS OF LOC. 4 
IRESTORE CONTENTS OF LOC, 6 
ISET UP TO BEGIN TESTING 
ISET UP FUR MEMORY TABLE CREATION 
ISET UP FOR PARITY TABLE CREATION 
ISET UP FOR OFFSET TABLE CREATION 
ITHIS TABLE ONLY HAS EFFECT IF 
IMEMORY HI>MT IS TURNED ON 
ISET UP FOR INTERLEAVE TABLE 
ICREATION ta • WAY INTERLEAVE 
ICAPABILIlY EXISTS3 
**************************************** 



LET'S DETERMINE IF SEVERAL REGISTERS EXIST, FOR tXAMPLE, 

172100 GOVERNING CORE MEMORY - BK 
t 172102 GOVERNING MOS MEMORY 8 - 16K 

1 172112 GOVERNING CORE MEMORY 40 - 56K 

IF WE WANT TO PRESELECT ONE OF THEM OR CREATE A TABLE OF ALL THOSE 
AVAILABLE AND CARRY ON TtSTING FROM THE TABLE 

NOTE! SEE DOCUMENT CDNCtRNING TABLE APPEARANCES AS A 

FUNCTION OF MEMORY MANAGEMENT (KTll OPTIQN3 BEING 
ENABLED OR DISABLtD DURING PROGRAM EXECUTION 

•*•*••«•**«**••••*******•*•***•****«**«**•••****•**••••••***•**••*•*•• 
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593 


002362 


0'l2737 


010000 










595 


002378 


001445 




596 


002372 






597 


002372 


10440B 


002400 


598 


002376 


000433 




599 








600 


002466 






601 


002466 


1U4406 


001340 


602 








603 








604 


002472 


0*5237 


001630 


60S 


002476 


0l374a 


000004 


606 


002502 


0100404 




607 


002504 


0i2712 


172100 


608 








609 


002510 


013746 


000004 


610 


002514 


012704 


001644 


611 








612 


002520 


0W5737 


002304 


613 


002524 


0li'1402 




614 


002526 


005077 


175500 


615 








616 








617 


002532 


0*2737 


003144 


616 


002540 


0^27 12 


172136 


619 


002544 


100002 




bc!e 


D0£S46 


0"O1 37 


003172 


621 


002552 


005772 


000000 


622 


002556 


004737 


003222 


623 








624 








625 








626 








627 








628 








629 


002562 


0*2737 


0031 12 


630 








631 


002570 


0*2737 


013700 


oSe 


SS25T6 


B* 1437 


p0163e 


633 








634 








635 


002602 


0105737 


002304 


636 


002606 


100013 




637 


002610 


062737 


010000 


636 








639 


00c6 1 6 


OI3737 


001640 


640 


002624 


062710 


000140 


Ml 


002630 


011077 


175376 


642 


002634 


000406 




643 


002636 


0<'2737 


004000 


644 


002644 


OI3737 


001640 


645 


002652 


0»5777 


176762 


646 


002656 


013713 


001640 



BIT 
BCO 



•aiT12,»ti>MR 
FINOONE 



TYPE ,.♦4 

8R 649 

l.*SCI2 <15>«12»''T¥PE THE 

ACCEPT. SREGO 



000004 5*: 



INC 
HOV 
BR 



MOV 
MOV 

TST 
BEO 
CUR 



HOV 
CMP 
BPL 
JMP 
TST 
JSR 



••USERTYPt 

M4,-CSP) 

NtXTl 

HOV «172te0,(R2) 

•«4,-tSPJ 
•INTERTABLE, R4 

#»SKTtl 

5t 

•KPARl 



tNOREG,*** 
«172136, C*<2) 
12s 

#*NOMORE 
»(R2) 

R7,##P*RTST 



rOOES THE USER WISH TO SELECT THE 

»RESISTER» 

»BR*NCH If NO 

I TYPE ASCtZ STRING 
;GET over THE ASCII 
REGISTER YUU MANT » HIT CARRIAGE RtTURN • 

I PICK UP rHE DESIRED REEISTCR 

IFHOH THE TELETYPE AND STORE 

UN FIRST TABLE LOCATION 

»SET FLAG INDICATING USER SELECTIUN 

I SAVE CONIENTS OF LOC. 4 

ISKIP THE NEXT INSTRUCTIONS 

IMOVE 1ST POSSIBLE PARITY 

IREGISTER INTO SREGO 

fPUSH CONIENTS OF LOC. 4 ONTO STACK 

UNITIALISE INTERLEAVE TABLE 

»POINTER 

IKTll ARE YOU THERE? 
IBRANCH If NO 

(RESET PAbE 1 ADDRESS REGISTER 

IBEFQRE TESTING NEXT PARITY 
ICONTROL REGISTER 

»3ET PARITY TIMEOUT VECTOR SERVICt ADDRESS 
IIS THE AUORESS IN BOUNDSt 
IBRANCH l<r YES 

»OTHERNISt - TERMINATE TABLE! 
I YES - IS THIS REGISTER PRESENT? 
ICHECK OUI FOR FATAL ERRORS 



ME HAVE CHECKED OUT THE HEGISTER AND FOUND IT TO BE WORKING PROPERLY 
NOW WE WILL FIND ITS ASSUCIATED PARITY MEMORY, I^ IT EXISTSIJ 



000004 
001640 



001640 
001634 



001640 1»: 
001634 

9»: 



*PAi<C0RE,'«4 



MOV *13780,*«nEMAD 

nOV CR43 ,**BL''LriT 



TST P«SKTSl 

BPL IS 

ADD #10000, *«nEMAD 

MOV •*MEHAD,**RESTOREBASE 

ADD •140,(RO} 

MOV CRe],#KPAKl 

BR 9S 

ADO •4O0O,**MtHAO 

MOV #«MbHAD,#«RESTOREBASE 

TST #MEHAD 

MOV #«HEMAD,CN3) 



ISET MEMOKY TIMEOUT VECTOR 

rSERVICE ADDRESS 

»SET UP A STARTING ADDRESS 

»SET A UDUNTtB fan CONSECUTIVE 

ILOCATION CHECKS TO COVER MEMORY 

I INTERLEAVING 

I SHOULD I LOOK ABOVE 2SK? 

IBRANCH If NO 

ISTEP UP to A PAGE 1 BASE ADDRESS 

I IF MEHORT MANAGEMENT TURNED ON 

ISAVE PAGt 1 BASE ADDRESS 

ISET UP AN OFFSET FOR KPARl 

ISET OFFStT IN PAGE 1 REGISTER 

•SKIP NEXr 2 INSTRUCTIONS 

ISTEP UP to NEXT BANK 

ISAVE INITIAL MEMORY ADDRESS 

IIS THIS "EMORY AVAILABLE? 

lYES - STORE THIS MEMORY LOCATION 
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FLOW 






647 


002662 


0i«4757 


003430 




JSR 




JNOW LET'S SEE IF IT'S PARITY 


646 














IMEMORY CURRESPONOING TO THE 


649 




005737 










IPARITY RfeGISTER WE'VE FOUND 


650 


002666 


002304 




TST 


••IKTll 


IKTll ARE YOU THERE? 


651 


002672 


100034 






BPL 


4S 


IBRANCH ir NO 


652 


002674 


0U5337 


001632 




DEC 


••BLKCNT 


IDECHEASECONSECUTIVE 


653 














ILOCATION COUNTER 


654 


002700 


005737 


001632 




TST 


•«BLKCNT 


lARE WE DUNE CHECKING 


655 














ICONSECUTiVE LOCATIONS? 


656 


I9a27i()4 


0ula0« 






BEO 


6S 


IBRANCH If YES 


657 


002706 


062737 


000002 


001640 


ADO 


*2,#«MEMAU 


ISTEP UP 1 LOCATION 


656 


002714 


0(i>0756 






BR 


9* 


IGO BACK ro TEST WITH THIS 


659 














ILOCATION 


660 


002716 


013737 


001634 


001640 6»: 


MOV 


••RtSTOREBASE,#4MEMA0 


1 RESTORE ^AGE 1 BASE ADDRESS 


661 














IBEFORE GUING BACK TO INCREASE 


662 














1 OFFSET 


663 


002724 


062704 


000004 




ADO 


• 4,R4 


ISTEP TABLE POINTER UP FOR 


664 














INEXT VALUE OF CONSECUTIVE 


665 














ILOCATION TO BE CHECKED 


666 


002730 


0''5714 






TST 


C«4) 


lARE THERt ANY MORE? 


667 


002732 


0O14;]5 






BEO 


10s 


IBRANCH If NO 


666 


002734 


011437 


001632 




MOV 


CR4),##BLKCNT 


ISTORE THIS VALUE OF CONSECUTIVE 


669 




005037 










ILOCATION CHECKS 


670 


002740 


001636 




CLR 


•iLEAFCNT 


ICLEAR INIERLEAVE VALUE HOLDER 


671 














IBEFORE RtTESTING 


672 


002744 


010742 






BR 


9S 


IGO BACK 10 TEST WITH THIS VALUE 


673 














;0F CONSECUTIVE LOCATIONS 


674 


002746 


012704 


001644 


I0s: 


HOV 


•INTERTABLE, R4 


llNITIALI-tE INTERLEAVE TABLE 


675 














IPOINTER 


676 


002752 


0U437 


001632 




MOV 


tH4) .##BLKCNT 


(RESET THt CONSECUTIVE 


677 














ILOCATION COUNTER 


678 


002756 


005037 


001636 




CLR 


•#LEAFCNT 


ICLEAR INTERLEAVE VALUE HOLDER 


679 














IBEFORE RtTESTING 


680 


002762 


0^0720 






BR 


2$ 


IGO BACK TO INCREASE OFFSET 


681 














lAND TEST 


682 


002764 


0<i2737 


157700 


001640 4*; 


CMP 


•157700. •»MEM*0 


I ARE WE TO 28K YET? 


683 


002772 


001434 






BEO 


8S 


IBRANCH ir YES 


684 


002774 


005337 


001632 




DEC 


••9LKCNT 


IDECREASE CONSECUTIVE 


685 














ILOCATION COUNTER 


686 


003000 


005737 


001632 




TST 


••BLKCNT 


lARE WE DUNE CHECKING CONSEC> 


687 














lUTIVE LOCATIONS? 


686 


003004 


001404 






BEQ 


7S 


IBRANCH if YES 


689 


003006 


062737 


000002 


001640 


AOD 


•2,*«HEHAU 


ISTEP UP » LOCATION 


690 


003014 


000716 






BR 


9S 


IGO BACK io TEST WITH THIS 


691 














ILOCATION 


692 


003016 


013737 


001634 


001640 7t! 


MOV 


f«HESTOREBASE,*«MEHAD 


IRESTORE INITIAL MEMORY 


693 














1 ADDRESS BFFORF GOING fn 


694 














ISTEP UP TO NEXT BANK 


695 


003024 


062704 


000004 




AOD 


*4,R4 


ISTEP TABLE POINTER UP FOR 


696 














INEXT VALUE OF CONSECUTIVE 


697 




005714 










ILOCATION* TO BE CHECKED 


698 


003930 






TST 


Ck45 


MRt TMEsm ^N* MORE? 


699 


003032 


001405 






BES 


lis 


IBRANCH If NO 


780 


003034 


011437 


001632 




MOV 


tR4) ,»#8LHCNT 


ISTORE THIS VALUE OF 



MAINDEC' 


-11-DCKBR-t 
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701 












ICONSECUTiVE LOCATION CHECKS 


702 


003040 


0K15037 


001636 


CLR 


•»LEAFCNT 


ICLEAR INJERLEAVE VALUE HOLDER 


703 












I8EP0RE RtTESTING 


704 


003044 


0B0702 




BR 


9S 


IGO BACK TO STEP UP TO THE . 


705 












»NEXT BANK TO CONDUCT TESTING 


706 


003046 


012704 


001644 


lis: MOV 


«INTERTAaLE,R4 


1 INITIALISE INTERLEAVE 


707 












STABLE POINTER 


708 


003052 


011437 


001632 


MOV 


CR4) i##BLKCNT 


(RESET THt CONSECUTIVE 


709 












ILOCATIQN COUNTER 


710 


003056 


005037 


001636 


CLR 


•#LtAFCNT 


KLEAR INTERLEAVE VALUE HOLDER 


711 












rBEPORE RfcTESTlNG 


712 


003062 


0lil0665 




8H 


IS 


IGO BACK jo STEP UP TO NEXT 


71 J 












IBANK TO Conduct testing 


714 


003064 


011237 


001622 


8»; MOV 


CR2) ,##PAHITY 


ISTORE THt BAD REGISTER WITH 


715 












INO PARITY MEMORY 


71fc 


003070 


1<I>4004 




HUT 


♦ 4 


INO PARITY MEMORY FOUND 


717 












IBELOW 28K11UIU 


718 


003072 


01^5737 


001630 


TST 


•#USERTYPfc 


lOID USER SELECT REGISTER? 


7 


003076 


0'>1402 




9EQ 


3S 


1 BRANCH If NO 


720 


003100 


000137 


002372 


JMP 


•#M5GTYP 


IGO BACK TO RETYPE MESSAGE FOR 


721 












lUSER RESPONSE 


722 


003 1 04 


062712 


000002 


3»: ADD 


«2i CR2] 


IPLACE NEXT POSSIBLE REGISTER 


723 












UNTO SAMt TABLE LOCATION 


724 


0031 10 


000601 




BR 


NEXTl 


160 BACK jo TEST THIS REGISTER 


725 


0031 12 


0<i2626 




PARCOREI 


CMP C»P)+(CSP5* 


IRESET STACK FROM MEMORY TIMEOUT 


726 


0031 14 


011237 


001622 


HOV 


CR2J ,»iPAMlTY 


ISTORE THt REGISTER THAT EN" 


727 












ICOUNTERElj A POSSIBLE HOLE IN 


728 












IMEMORY 


729 


003120 


104007 




HLT 


+ 7 


lA POSSIBLE HOLE IN MEMORY EXISTS 


730 












IWITH NO t^ARITY BELOW ITUMlli 


731 


003122 


005737 


001630 


TST 


•#USERTYPt 


IDID USER SELECT REGISTER? 


732 


003126 


0i)1402 




BEQ 


4S 


IBRANCH If NO ^ 


733 


003130 


0(1)0137 


002372 


JMP 


•iMSGTYP 


IGO BACK 10 RETYPE MESSAGE FOR 


734 












lUSER RESPONSE 


735 


003134 


062712 


000002 


4*1 ADD 


»2r (R2) 


IPLACE NE*T POSSIBLE REGISTER 


736 












IINTO SAMt TABLE LOCATION 


737 


003140 


000137 


002514 


JMP 


*«NEXT1 


IGO BACK [0 TEST THIS REGISTER 


738 


003144 






NOREGI CMP 


CSP3 *« CSPJ* 


IRESET STACK FROM REGISTER TlMEOUj 


739 


003146 


0*15737 


001630 


TST 


•tUSERTYPt 


IDID THE USER SELECT THE REGISTER? 


740 


003152 


01191403 




BEQ 


IS 


IBRANCH If NO 


741 


003154 


li)4006 




HLT 


+ 6 


lYES » UStR SELECTED REGISTER NOT 


742 












IPRESENT UN SYSTEM 


743 


003156 


000137 


002372 


JMP 


»#MSGTYP 


IGO BACK JO RETYPE MESSAGE 


744 


003162 


062712 


000002 


l»» ADD 


#2r (R2} 


I8TEP UP to NEXT PARITY REGISTER 


745 












lAT SAME TABLE LOCATION 


746 


003166 


0140137 


002514 


JMP 


##NtXTl 


IPREVIOUS PARITY REGISTER NOT 


747 












IPRESENT ' SEE IF THE NEXT ONE IS 


748 


003172 


012637 




NOMOREt MOV 


(SP)*,»«4 




749 


003176 


005012 




CLR 


CR2) 


lALL DONE'TABLE CREATION 


750 












lEND IT WITH A 'B* 


751 


003200 


0H0137 


003620 


JMP 


••START 


ISTART RUNNING PROGRAM WITH 


752 












ITA8LE CONTENTS 


753 








I************************************** 


*************************** 


754 








t 







MAINDEC-U-DCKBR-t 



DCKBRE.Pll 




755 






756 






757 






758 






759 






T60 






761 


003204 


162700 


762 






763 


003210 


010001 


764 






765 


003212 


020020 


766 


003214 


010011 


767 


003216 


011110 


768 


003220 


000203 


769 






770 






771 






772 






773 






774 






775 






776 






777 


003222 


011267 


778 






779 






780 






781 


003226 


0140004 


782 


003230 


0S2777 


783 


003236 


0i2777 


784 


003244 


001001 


785 


003246 


104002 


786 






787 






788 






769 


003250 


000004 


790 


003252 


042777 


791 


003260 


0*2777 


792 


003266 


0141401 


793 


003270 


104002 


794 






795 






796 






797 


003272 


000004 


798 


003274 


0!'2777 


799 


003302 


0i2777 


800 


003310 


001001 


801 


003312 


104002 


802 


003314 


042777 


803 


003322 


032777 


804 


003330 


001401 


805 


003332 


104002 


806 






807 






808 
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000376 



000001 
91 



000004 
000004 



176364 
176356 



176342 
176334 



176320 
176312 



176300 
176272 



|1HE FOLLOWING ROUTINE WILL CREATE A 2 LOCATION MtMORY MAP AT 
|1hE HIGH END OF A IK CORt SECTION, THIS 2 LOCATION MAP WILL 
iInITIALLY BE USED TO OETtRMINE WHERE/IF PARITY MtMORY 
It'RESIDES AND LATER FOR SUBSEQUENT PROGRAM TESTING OF A REGISTER 
I 



CUMPUTJ SUB 

MOV 

CMP 
MOV 
MOV 
RTS 



#376, R0 

R0,R1 

R0, CR0J + 
R0,#R1 
#R1,«R0 
R3 



iiiH!**************.********* 
lOROP DOWN SO AS NOT TO 
IDESTROY tABS LOADER 
IRl CONTAINS BEGINNING ADDRESS 
I OF MEMOR Y MAP 
ISTEP RO to NEXT ADDRESS 
1 1ST MEMQHY LOCATION 
I2N0 MEMOMY LOCATION 
IRETURN TO TEST A DATI 
IWITH CONTENTS OF THESE 2 LOCS, 



;«•**••*«*•****••****•** ********•*******•********•***••*••*********•• 

1 

|THIS ROUTINE WILL CHECK IF THE PARITY REGISTER IS STATICALLY IN 

fttOOD OPERATION FOR TESTING TO BE CONDUCTED 

I 

I******* •••*•*•*«**• **************************** ****•••****•*••*****« 

PARTSTI MOV CR2), PARITY IGET PARITY REGISTER TO BE USED 

I***************************************************************** 

I TEST 1 SET BIT0 CUS£03 Of PARITY REGISTER 

I***************************************************************** 

TSTll SCOPE 

BIS #BIT0,»PAHITY 

BIT #8IT0,»PAHITY IDID IT StT? 

BNE .*'4 lYES 

HLT +2 INO - FATAL ERROR TO PROGRAM! 

I***************************************************************** 

ijEST 2 CLEAR BIT0 CUSED3 OF PARITY REGISTER 

t***************************************************************** 

TST2« SCOPE 

BIC #BIT0,»PAMITY 

BIT «BIT0,»PAHITY IDID IT CLEAR? 

BEQ ,*i lYES 

HLT +2 INO - FATAL ERROR TO PROGRAMJ 

I***************************************************************** 
ijEST 3 SET AND CLEAR BIT^ tUSED) OF PARITY REGISjER 
I***************************************************************** 

TST3I 



SCOPE 












BIS 


•aiT2i 


.♦PAHITY 








BIT 


*BIT2| 


,#PAMITY 


IDID 


IT StT? 




BNE 


• ** 




lYES 






HLT 


*i 




INO - 


FAT*L ERROR 


TO 


BIC 


#BIT2i 


,#PAKITY 








BIT 


iaiT2, 


r#PAHlTY 


IDID 


IT CLEAR? 




BEQ 


.^4 




lYES 






HLT 


+2 




INO - 


FATAL ERROR 


TO 



I***************************************************************** 
ijEST 4 TEST RESET ON BIT* 0, 2 AND 15 

I***************************************************************** 
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829 


003334 


0140004 




810 


003336 


0B5737 


002304 


811 


003342 


1140415 




812 








813 










003344 


9S277T 


100093 


8i; 


003352 


000005 




816 


003354 


032777 


100005 


eiT 


003362 


0')1404 




SIS 


003364 


0*'2777 


100005 


819 








820 


003372 


lld400S 




821 








822 








823 








824 


003374 


0«<e004 




825 








826 


003376 


0^2777 


007740 


827 








829 








829 


003404 


032777 


007740 


830 


003412 


01111402 




S3! 


903414 


0140094 




832 


003416 


0140207 




833 


003420 


0B5237 


001626 


834 








835 


0I>I3424 


0(00004 




S36 
837 


3B342& 


3-SSS7 




838 








839 








840 








841 








842 








843 








844 








845 








846 


003430 


010546 




847 


003432 


010046 




848 




f }A0 




849 








85(11 


003436 


0(114337 


003204 


851 








852 


003442 


011267 


176154 


853 








854 








855 








856 








857 








858 








859 








860 


003446 


012705 


011450 


861 


003452 


0144015 




862 


003454 


0(43500 





T»T4I 



176250 
176240 

176230 



SCOPE 

T8T 

BMI 



BIS 
RESET 
BIT 
BEQ 

SIC 

MLT 



##tKTll 

MHICHl 



«iee005,#PARiTy 

#100003, P^'ARITV 
• ♦12 

•100005, *PAR!7Y 
♦5 



IKTll ONt 

IBRANCH If YES AND DON'T DO 
ITHIS TEST BECAUSE THE 'RESET' 
l(<IILL CLOBBER SEGMENTATION 

lEXPECT BiTS 0, 2 AND IS TO CUEAR 

tOlO THEY CLEARt 

rYES 

;N0 - CLEAR OUT RESISTER A3 A 
»PRECAUT1UN 
»RESET OOtSN'T WORK 



I***************************************************************** 

fTEST 5 WHICH OPTION IS ABOUT TO SE TESTED 

I***************************************************************** 

TST5I SCOPE 



176216 HHICHi: BIS 
176210 



1*1 



BIT 
BEQ 
SCOPE 
RTS 
INC 

SCOPE 



«7740,#PAKITY 



*7740,#PAK1TY 
IS 



R7 

•«MSREGFLAG 



IIS AN OLU HSU OPTION 
IWITH NO ADDRESS BITS 
I ABOUT TO BE TESTED? 
lADDRESS BITS ABLE TO BE SETT 
IBRANCH ir NO INDICATING HSlt 

IRETURN TU NORMAL FLOW 

ISET FLAG INDICATING MSll OPTION 

IWITH NO ADDRESS BITS 

fRETuRN T** riuRHAL FLOW 



I******************************************************************** 

r 

I The following routine will take each ik bank of memory 

JTHAT IS AVAILABLE AND PERFORM A DATI IN IT 

itO DETERMINE IF PARITY E«ISTS THERE. THIS ROUTINE IS 

|OnLY USED DURING TABLE CNEATION 

I 

I **•****•••••**••••• *******<t*******************#**ik******«i*iii***«*«*****« 
ABORT! MOV R5,-CSP) ISAVE R5 l-ONTENTS ON STACK 

MOV R0,-CSP3 ISAVE R0 tONTENTS ON STACK 

unti C^3) ' R3 "SET THE ^urlOnY ' S'*nT*uN 

IJUST DETtRMINED 
JSR H3,»»C0MPUT ICOMPUTE *N AREA IN THIS BANK 

IFOR DETERMINING PARHY MEMORY 
MDV CR2), PARITY IGET THE ^-ARITY REGISTER JUST 

IFOUND ANp TEST WITH IT 

TEST A DATI IN THIS BANK 

n/45 ***• ROM STATE 221 *«•• 



11/40 •••• ROM STATE 207 •*** 
MOV iVECSET,Rb 
JSR R0,(RS) 
ONETRY 



ISET UP SERVICE ROUTINE ADDRESS 
ISET UP PARITY VECTOR SERVICE 
IROUTINE ADDRESS 



MAINOEC-lt-OCKBR- 
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863 
864 
865 
866 
867 
868 
869 
870 
871 



894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
9JS 
911 
912 
913 
914 
915 
916 



003456 
003460 
003462 
003464 
003472 
003474 
003476 



011100 
010010 
010030 
042777 
012600 
012605 
0kl32B7 



000005 176130 



MOV 
MOV 
MOV 
BIC 
MOV 
MOV 
RTS 



003572 
003574 
003600 

003604 
003610 
003614 



012212 
0*12712 
016425 

0(115037 
0105037 
000137 



000002 
000002 

001636 
001626 
002510 



MOV 
ADD 
MOV 

CLR 
CLR 
JMP 



fRt,R0 
Ht),«N0 

R0,#CR0}'» 

*8IT21BIT(4,»PARITY 

CSP}4,R0 

CSP5*,R5 

R7 



872 


003500 


at2777 


000005 


176114 DNETRYI 


Rjr 


tHTTalRTTU.aPlRTTy 


873 


003506 


016600 


000004 




MOV 


4CSP)iRB 


874 


003512 


016605 


000006 




MOV 


6(SP),R5 


875 


003516 


0B5237 


001636 




INC 


•tLEAFCNT 


876 


003522 


0^2737 


000003 


001636 


CMP 


•3,»#LEAFtNT 


877 


003530 


001403 






BEQ 


IS 


878 


003532 


062706 


000010 




ADD 


*10,SP 


879 


003536 


0(00207 






RTS 


R7 


see 


003540 


0<:2626 




1»I 


CMP 


tSP3*, CSPJ* 


881 


003542 


012600 






MOV 


CSP}'f ,R0 


882 


003544 


012605 






MOV 


CSP3*,R5 


883 


003546 


e«i5726 






TST 


CSP)* 


884 














885 


003550 


0H5737 


001630 




TST 


•fUSERTYPfc 


886 


003554 


001404 






BEQ 


2S 


867 


003556 


016415 


000002 




MOV 


2(R4} , CR5J 


888 












889 


003562 


0)40137 


003620 




JMP 


•♦START 


890 














891 


003566 


005723 




2»: 


TST 


CR3)* 


892 














893 


003570 


0(05720 






TST 


CH03* 



CR2)*, CR2J 
«2, (R2} 
2tR4) , CR5)* 

••LEAFCNT 

f*MSREGFLAG 

**NEXT1 



ISET UP FUR A DATO 
IDO THE D»TO 
100 A DAT! 

IWRITE NORMAL AND DISABLE 
IRE8T0HE K0 CONTENTS 
IRESTORE K5 CONTENTS 
INOT PARITY MEMORYl 
IRETURN TU TEST AT NEXT 
I INCREMENT 

lUF HAVE ^ARITY MEMORY ~ PRCCEES 

IRESTOrE i<0 CONTENTS 

IRESTORE ^5 CONTENTS 

f INCREMENT INTERLEAVE COUNTER 

13 ABORTS REACHED* 

IBRANCH If YES 

IBYPASS JUNK ON STACK 

IRETURN TU TEST AT NEXT INCREMENT 

IPOP STAC* BACK FROM PARITY ABORT 

IRESTORE K0 CONTENTS 

IRESTORE l<5 CONTENTS 

IPOP STACK ONCE FOR ABORT ROUTINE 

lENTRY 

IDIO USER TYPE IN REGISTER? 
IBRANCH It- NO 

ISET INTERLEAVE VALUE INTO 
ITABLE 

I AND LOCK ON THE USER SELECTED 
IREGISTER FOR TESTING 
lUSER DIDN'T SELECT - SO STEP UP 
ITO NEXT MEMORY TABLE LOCATION 
ISTEP UP TO NEXT OFFSET TABLE 
ILOCATION - THIS TABLE WILL ONLY 
IBE APPLICABLE IF MEMORY MGMT 
IIS TURNEU ON 

ISET NEXT POSSIBLE REGISTER INTO 
INEXT REGISTER TABLE LOCATION 
ISET INTERLEAVE VALUE INTO 
ITABLE 

IRESET NO, OF ABORTS COUNTER 
ICLEAR PARITY TYPE INDICATOR 
IGO BACK iO CHECK NEXT POSSIBLE 
IPARITY RtGISTER 



IF WE HAVE REACHED THIS POINT IN THE PROGRAM THEN, 
•REGOCLOCATION 1340) WILL CONTAIN THE FIRST PARI1Y REGISTER 
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917 
918 
919 
920 
921 
922 
923 
92« 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 
952 
953 
95fl 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 
970 



LOCATION 1342 UP TO 1364 MILL CONUIN ANY HORE 
REGISTERS FOUND 
*TMP0(LOCATION 1366} HILI- CONTAIN AN ADDRESS IN IHE BANK 

THAT HAS PARITY ASSOCIATED "ITH THE PARITY 

REGISTER IN SRE60 

LOCATION 1370 UP TO 1412 WILL CONTAIN THE CORRESPONDING 
MEMORY PARITY LOCATIONS FOR THE OTHER REGISTERS 
•SETeCLOCATION 1420} WILt* CONTAIN THE OFFSET VALUE TO BE USED 
WIT« THE CORRESPONDING VALUt IN STMP0 

LOCATION 1422 TO 1444 MILL CONTAIN THE CORRESPONDING 
OFFSET VALUES FOR THE OTHER REGISTERS 

NTER0(LOCATION 145ii)l WILL CONTAIN THE INTERLEAVE FACTOR TO BE USED 
WITH THE PARITY REGISTER IN SREGB 

LOCATION 1452 TO 1474 WILL CONTAIN THE CORRESPONDING 
INTERLEAVE FACTORS FOR THE OTHER REGISTERS 

NOTEJ TO UNDERSTAND THE TABLE SETUP SEE THE DOCUMENT 



******••*••••••••••**•••****••*•*•*•**•*••*••**•*•*••*••***••*••••**** 



***»»**»*»»« until* *»**»***** *»*»** *********** »»*» 

THE REST OF THE PROGRAM WILL TEST ALL PARITY ABOHTS 

USING EITHER THE PARITY KEGISTER TYPED BY THE UStR OR THOSE 

ENCOUNTERED IN THE TABLE PREVIOUSLY GENERATED. 



003620 011)5777 175512 

003624 01(11401 

003626 000402 

003630 000137 011464 

003634 017767 175476 175760 

003642 162767 000002 175432 



003650 005737 002304 

003654 100006 

003656 017777 175534 174346 

003664 062767 000001 175410 



START: 



l»l 
2»l 



TST 

BEO 

BR 

JMP 

MOV 

SUB 



TST 
BPL 
MOV 
ADD 



003672 017700 175516 



*SREGAD 

IS 

2$ 

••RESTART 
#$REGAO, PARITY 
#2|JTSTNM 



••SKTll 
3S 

•SSETAD.PKPARl 

#liST8TNM 



*STMPAD,RU 



I ARE WE AT END OF TABLET 
JBRANCH I^ YES 

lOTHERWISt SKIP NEXT INSTRUCTION 
»SET UP TU START TABLE OVERll 
IGET PARITY REGISTER TO BE USED 
^DECREASE TEST NO, FOR SCOPE 
LOOPING IN CASE TEST #4 WAS 
>OONE BECAUSE TEST «4 BEING 
»OONE THRUWS ST8TNM COUNT OFF 
IBY 2 

»KTH ARE YOU THERE? 

IBRANCH I'' NO 

fGET THE OFFSET NEEDED 

»SET TEST NO, TO A CORRECT 

I VALUE* TtST #4 MAS NOT 

FEXECUTEO 

»GET PARITY MEMORY ASSOCIATED 



MAINDEC 


-ll-DCKBR<t 


MACYU 


27(657} 


2IA-MAY 


-75 14t33 PAGE 21 




OCKBRE, 


Pll 




CPU PARITY TEST 


MAIN FLOW 






971 
















»WITH THE PARITY REGISTER 


972 


003676 


004337 


003204 






JSR 


R3,»«C0MPUT 


fCOMPUTE AN AREA IN THIS BANK 


973 
















»FOR TESTING 


974 


003702 


010137 


001476 






MOV 


R1,**NEMSTK 


(SET UP A NEW STACK POINTER 


975 
















IFOR STAC^ OPERATIONS IN CASE 


976 
















;no parity memory resides in 


977 
















ILOWER 4K 


978 


003706 


0144737 


003376 






JSR 


PC.##MHICM1 


IDETERMINt IF WE ARE ABOUT TO 


979 
















(TEST AN UtD MOS DESIGNl 


980 


003712 


012705 


011450 






MOV 


«VECSET,Ra 


(SET UP SERVICE ROUTINE ADDRESS 


981 










lAtk******************!)******************************************** 


982 










»TEST 


6 TEST 


CADDRESS} SM0,DM3 HQV INSTRUCTION 


983 












984 


003716 








TaT6l 


SCOPE 






985 










f 




11/45 ROM STATE 


221 


986 










1 








987 










t 


11/40 


•*** ROM STATE 207 •*•* 




988 


003720 


004015 








JSR 


R0, (R5} 


FSET UP PARITY VECTOR SERVICE 


989 


003722 


003752 








A 




^ROUTINE ADDRESS 


990 


003724 


011100 








MOV 


fRliRO 


ISET UP FUR DATO 


991 


003726 


010010 








MOV 


R0,«R0 


IDO THE OATO 


992 


003730 


012737 


003740 


001332 




MOV 


#. + 10>*#S<«ODAT 


ISTORE THt PC THAT SHOULD 


993 
















IBE PUSHEU ON THE STACK 


994 
















HF A PARITY ABORT OCCURS 


995 


003736 


010030 








MOV 


R0,«(R0}* 


too A DATl 


996 


003740 


042777 


000004 


175654 




BIC 


#BIT2,#PAKITY 


» WRITE NOHMAL FOR EHT CALL 


997 


003746 


104001 








HLT 


♦ 1 . 


IDION'T ABORT 


998 


003750 


000410 








BR 


.'^22 


IGO TO NEXT TEST 


999 


003752 


042777 


000005 


175642 


A* 


BIC 


«BIT2JBITI«,#PARITY 


IWRITE NOHMAL AND DISABLE 


1000 


003760 


004037 


011550 






JSR 


R0,#«CHECKLOC 


f CHECK fOi< GOOD ABORT 


1001 


003764 


104003 








HLT 


♦ 3 


1 ABORTED INCORRECTLY 


1002 


003766 


012706 


001100 






MOV 


#STACK,SP 


»RESET THt STACK 


1003 










(*****•*••••*•*••**•****•**•****•**•**•••••••*•*•*•****••********• 


1004 










ITEST 


7 TEST 


CADDRESS} SM0,DH5 MOV INSTRUCTION 


1005 










***•*•***•••*•••••••****•*•**********•*••*••**•***•****••***••••*• 


1006 


003772 


000004 






TST7I 
» 


SCOPE 






1007 












11/45 ROM STATE 


231 ***• 


1008 










1 








1009 










t 


11/40 


••** ROM STATE 207 •*** 




1010 


003774 


004015 








JSR 


R0> CR5} 


fSET UP PARITY VECTOR SERVICE 


1011 


003776 


004026 








A0 




rROUTINE ADDRESS 


1012 


004000 


011100 








MOV 


#R1>R0 


rSET UP FUR DATO 


1013 


004002 


010020 








MOV 


R0, (R0}+ 


»D0 THE DATO 


1014 


004004 


012737 


004014 


001332 




MOV 


f.+lOffffbDOAT 


r STORE THt PC THAT SHOULD 


IBIS 
















>BE PUSHEU ON THE STACK 


1016 
















IIF A PARITY ABORT OCCURS 


1017 


004012 


010050 








MOV 


RB,*-(R0) 


100 A DAT! 


1018 


004014 


0*2777 


000004 


175600 




BIC 


•BIT2,#PAMITY 


f WRITE NQMMAL FOR EMT CALL 


1019 


004022 


104001 








HLT 


*l 


JDION'T ABORT 


1020 


004024 


000410 








BR 


.>22 


JGO TO NEXT TEST 


1021 


004026 


0*2777 


000005 


175S66 


AUI 


BIC 


#BIT21BITI«, •PARITY 


(WRITE NONMAL AND DISABLE 


1022 


004034 


004037 


011550 






JSR 


RBffliCHECKLOC 


f CHECK FOH GOOD ABORT 


1023 


004040 


104003 








HLT 


♦3 


1 ABORTED INCORRECTLV 


1024 


004042 


012706 


001100 






MOV 


•STACK, SP 


IRESET THt STACK 



MAINDEC-U-DCKBR-t 
DCKBRE.PU 



MACYU BTC6575 aM-M*Y-T5 14J33 P*SE 22 
CPU PARITY TEST M*IN PLOW 



1B25 










1 ***** 


******** 


************************ 


**************************** 


1026 










("'EST 


10 


TEST (DATA) SMl,OMfc 


MOV INSTRUCflON 


1027 










1 •**«*****«******•*•«•*««•«*«•»••*•*• «*«•*•»**«**•**•**••••••••*•• 


1028 


004^46 


0li)B004 






T8T10I 


SCOPE 






1029 










» 




11/45 **** ROM STATE 


27 **•• 


lese 










i 








1031 










1 


U/40 


•*** ROM STATE 206 **** 




1032 


004050 


0B4015 








JSR 


Ra» CR5J 


>SET UP PARITY VECTOR SERVICE 


1033 


004052 


0ll)ai04 








Al 




IROUTINE ADDRESS 


1034 


004054 


01 1 100 








MOV 


>R1,R0 


tStt UP FOR DATO 


103S 


004056 


010010 








MOV 


R0,#R0 


IDQ THE 0«T0 


103& 


004063 


012737 


004070 


001332 




MOV 


«, + 10f **St>DDAT 


1 STORE THt PC THAT SHOUUD 


1037 
















IBE PUSHEU ON THE STACK 


1036 
















IIP A PARiTY ABORT OCCURS 


1039 


004066 


01 1060 


1 77776 






MOV 


•R0,'2CR0J 


IDO A DAT^ 


1040 


004072 


0*2777 


000004 


175522 




BIC 


#aiT2,»PAKITY 


»WRITE NOHMAU POR EMT CAUU 


1041 


004100 


104001 








HUT 


♦ 1 


IDION'T ABORT 


1042 


004103 


000410 








BR 


.♦22 


IGO TO NEXT TEST 


1043 


004 1 04 


042777 


000005 


175510 


Ail 


BIC 


#BIT21BIT0,#PARITY 


>MRITE NOHMAU AND DISABUE 


1044 


004 112 


004037 


01 1550 






JSR 


R0,*«CHECKUOC 


ICHECK F0« GOOD ABORT 


1045 


0041 16 


1)^4003 








HLT 


♦ 3 


lABORTED iNCORRECTUY 


1046 


004120 


012706 


001 100 






MOV 


«STACKiSP 


IRESET THt STACK 


104* 










1 ±**** 


A*********************************************************** 


104S 










>"1EST 


11 


TEST CAOOHESS) SM0,DM7 MOV INSTRUCTION 


1049 










I***************************************************************** 


1050 


004124 


000004 






TSTin 


SCOPE 






1051 










1 




11/45 **•• ROM STATE 


231 **** 


10S2 










1 








1053 










1 


11/40 


»**• ROM STATE 207 *•*• 




1054 


004126 


004015 








JSR 


R0. (RS) 


ISET UP P*RITY VECTOR SERVICE 


1055 


004130 


01^4162 








A2 




IROUTINE ADDRESS 


1056 


004132 


0i 1 100 








MOV 


•R1,R0 


ISET UP FUR A DATO 


1057 


004134 


010020 








MOV 


R0> CR0}« 


IDO THE OATO 


1058 


004136 


012737 


004150 


001332 




MOV 


•.♦l2,#*Sb00AT 


ISTORE THt PC THAT SHOUUD 


1059 
















IBE PUSHEU ON THE STACK 


1060 
















IIF A PARITY ABORT OCCURS 


1061 


004144 


10070 


177776 






MOV 


R0t»-2CR0J 


100 A DATJt 


1062 


004150 


042777 


000004 


175444 




BIC 


#BIT2,#PAt<ITY 


IWRITE NOMMAU FOR EMT CAUL 


1063 


004156 


1I<I4001 








HUT 


♦ 1 


IDION'T ABORT 


1364 


304160 


0»36ie 








BR 




IGO TO n£*t Test 


1065 


004162 


042777 


000005 


175432 




BIC 


•BIT21BIT0,#PARITY 


IMRITE NOMHAL AND DISABLE 


1066 


004170 


004037 


1 1 550 






JSR 


R0,«#CHECKUOC 


ICHECK FQM GOOD ABORT 


1067 


004174 


\ 04003 








HUT 


♦ 3 


lABORTED INCORRECTLY 


1068 


004176 


012706 


001 100 






MOV 


•STACK, SP 


IRESET THt STACK 


1069 










I***************************************************************** 


1070 










»TEST 


12 


TEST CDATA) SH0,DM2 


CMP INSTRUCTION 


107 1 










r***************************************************************** 


1072 


004202 


000004 






TST12I 


SCOPE 






1073 










1 




11/45 *•** ROM STATE 


175 **** 


1074 










1 








1075 










1 


11/40 


•*•• ROM ST*TE 267 »*•• 




1076 


004204 


004015 








JSR 


R0, (R5} 


ISET UP P»RITY VECTOR SERVICE 


1077 


004206 


0ld4236 








B 




IROUTINE ADDRESS 


1078 


004210 


011100 








MOV 


*R1,R0 


ISET UP FUR DATO 



MAlNDEC-ll-OCKBR-t 
OCKBRE.Pll 



MACYll 27(657) 2ll'-MAY-75 
CPU PARITY TEST MAIN FLOW 



14:33 PAGE 23 



10TQ 


004212 


Bioaio 




1060 


004214 


012737 


004224 


1081 








1062 








1063 


004222 


0^0020 




1064 


004224 


042777 


000004 


1065 


004232 


104001 




1086 


004234 


000410 




1087 


004236 


042777 


000005 


1088 


004244 


0^4037 


OlliSB 


1089 


004250 


104003 




1090 


004252 


012706 


001100 


1091 








1092 








1093 








1094 


004256 


000004 




1095 








1096 








1097 








1098 


004260 


004015 




1099 


004262 


004312 




1100 


004264 


oUioe 




uei 


004266 


010020 




1102 


004270 


012737 


004300 


1103 








1104 








1105 


00427b 


020040 




1106 


004300 


0«2777 


000004 


1107 


004306 


104001 




lies 


004310 


000410 




1109 


004312 


042777 


000005 


1110 


004320 


004037 


011550 


int 


004324 


tiii4003 




1112 


004326 


012706 


001100 


1113 








1114 








1115 








1116 


004332 


0U0004 




1117 








1118 








1119 








1120 


004334 


004015 




1121 


004336 


004370 




1122 


004340 


011100 




1123 


004342 


010020 




1124 


004344 


012737 


004356 


1125 








1126 








1127 


004352 


0<:0060 


177776 


1128 


004356 


042777 


000004 


1129 


004364 


104001 




1130 


004366 


000410 




1131 


004370 


042777 


000005 


1132 


004376 


011)4037 


011550 



001332 

175370 
175356 



001332 

175314 
175302 



001332 

175236 
175224 



I ***** 

ITEST 
I ***** 

T»T13l 

I 

I 

I 



MOV 



CMP 

BIC 

HLT 

BR 

BIC 

JSR 

HLT 

MOV 
******* 
13 
******* 

SCOPE 



RB,PR0 

*.+10,*«SbDDAT 



R0, CRO}« 
•BIT2,»PAKITY 

♦ 1 

.«22 

#BIT219IT0,»PARITY 
R0,*«CHECKLOC 

♦ 3 

•STACK, SP 
•**•*•************•****« 

TEST (DATA) SMO,0M4 



IDO THE D*TC 

ISTORE THt PC THAT SHOULD 
IBE PUSHED ON THE STACK 
IIF A PARITY ABORT OCCURS 
IDO A OATAP, OATI 
IWRITE NOHMAL FOR EMT CAUL 
lOlDN'T A»ORT 
160 TO NE*T TEST 
IWRITE NOHMAL AND DISABLE 
ICHECK FQM GOOD ABORT 
lABORTED INCORRECTLY 
IRESET THt STACK 
•*• ************************** 
CMP INSTRUCTION 



***************************************************** 
11/45 *••* ROM STATE 177 **** 



11/40 

JSR 

BO 

MOV 

MOV 

MOV 



*••* ROM STATE 267 
R0, CR5) 

•«1,R0 

R0,CRO]+ 

•.«ie,*«SbDOAT 



I***** 

llEST 

J ••*«* 

TST14I 

I 

I 

I 



CMP R0,-CR0) 

BIC •BIT2,#PAHITY 

HLT ♦! 

BR .*22 

BIC •BIT2!BITB, •PARITY 

JSR R0,f«CHECKLOC 

HLT +3 

MOV •STACK, SP 

************ A*********************************************** 

14 TEST (DATA] SM0,DM6 CMP INSTRUCTION 

************************************************************ 

SCOPE 

11/45 ***• ROM STATE 177 **** 



ISET UP P*RITY VECTOR SERVICE 
IROUTINE ADDRESS 
ISET UP FUR OATO 
100 THE D*TO 

ISTORE THt PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
IIF A PARITY ABORT OCCURS 
IDO A OATiP, DATI 
IWRITE NOHMAL FOR EMT CALL 
I DIDN'T ABORT 
IGO TO NEXT TEST 
IWRITE NQKMAL AND DISABLE 
ICHECK FOM GOOD ABORT 
lABORTED iNCORRECTLY 
IRESET THt STACK 



11/40 **** ROM STATE 267 •*** 



JSR 

Bl 

MOV 

MOV 

MOV 



CMP 

BIC 

HLT 

BR 

BIC 

JSR 



R0, CR5} 

•R1,R0 

R0, (RO)* 

• .4'12,*«SbDDAT 



R0,>2(R0} 

•BIT2,#PAKITY 

♦J 

.«2e 

•8IT21BITB,»PARITY 
R0,*#CHECKLOC 



ISET UP PARITY VECTOR SERVICE 
IROUTINE ADDRESS 
ISET UP FUR DATO 
IDO THE 0»TO 

ISTORE THt PC THAT SHOULD 

IBE PUSHEU ON THE STACK 

IIP A PARITY ABORT OCCURS 

IDO A DATI, OATIP 

IWRITE NOHMAL FOR EMT CALL 

lOIDN'T ABORT 

ISO TO NEXT TEST 

IWRITE NOHMAL AND DISABLE 

ICHECK FOH GOOD ABORT 



M*INDCC 


-11-DCKBR-t 


MACVJl 


27(6575 


2KI-MAY 


-75 14:33 PAGE 24 




DCKBRE.PU 




CPU PARITY TEST 


M*IN FLOW 






1133 


004482 


1104003 








HUT 


♦ 3 


lABQRTED INCORRECTLY 


1134 


004404 


0^2706 


001100 






MOV 


•STACK, SP 


IRESET THt STACK 


1135 










I******************* ****************** 


**************************** 


1136 










»!EST 


15 


TEST tOATA) SMO.DMl 


CMP INSTRUCTION 


1137 










I***************************************************************** 


1138 


004410 


0WO004 






TST15I 


SCOPE 






1139 










1 




11/45 **** ROM STATE 


175 **•* 


1140 










1 








1141 










1 


1 1/40 


**** ROM STATE 267 **** 




1143 


004412 


0*4015 












1 ttCT IID DADTTV UPPTAP 4ffQUTr*P 
Ur r^KIlT VCUlUn aCnViuC 


1143 


0044ia 


0(^4444 








B2 




•ROUTINE ADDRESS 


1144 


004416 


0l 1 100 








MOV 


#R1>R0 


JSET UP FUR DATO 


1145 


004420 


01001 








MOV 


R0,»R0 


IDO THE 0*T0 


1146 


004422 


012737 


004432 


001332 




HOV 


#, + 10,»#$l»DDAT 


JSTORE THt PC THAT SHOULD 


1147 
















IBE PUSHEU ON THE STACK 


1148 
















»IF A PARITY ABORT OCCURS 


1149 


004430 


0^0010 








CMP 


R0,*RO 


»D0 A DATiP, DATI 


1150 


004032 


0^2777 


000004 


17i3l62 




BIC 


iBIT2,#PAHITY 


>WRITE NORMAL FOR EMT CALL 


1151 


00a440 


1 04001 








HLT 


+ 1 


»OIDN'T ABORT 


1152 


004442 


0000 1 








BR 




IGO TO NE«T TEST 


1153 


004444 


042777 


000005 


175150 




BIC 


«6IT21BITB,#PARITY 


(WRITE NQMMAL AND OISABLE 


1154 


004452 


0134037 


011550 






JSR 


R0.##CHECKLOC 


ICHECK FOM GOOD ABORT 


1155 


004456 


104003 








HLT 


*3 


» ABORTED INCORRECTLY 


1156 


004460 


012706 


001100 






MOV 


#STACK,SP 


(RESET THt STACK 


1157 










;***************************************************************** 


1158 










> lEST 


16 


TEST tOATA) SM0,DM3 


CMP INSTRUCTION 


1159 










;•**** 


************************************************************ 


1160 


004464 


0^0004 






TST16I 


SCOPE 






1161 










» 




11/45 ••«* ROM STATE 


177 •*** 


1162 










t 








1163 










t 


11/40 


•*** ROM STATE 267 **** 




1164 


004466 


0*34015 








JSR 


R0, CR5) 


»SET UP PARITY VECTOR SERVICE 


1165 


004470 










B3 




(ROUTINE ADDRESS 


1166 


004472 


01 1 100 








MOV 


•R1,R0 


(SET UP FOR DATO 


1167 


004474 


010020 








MOV 


RO, CR0]« 


(DO THE D*TO 


1168 


004476 


0*^2777 


000004 


175116 




BIC 


#B1T2,#PAKITY 


(WRITE NQKMAL 


1169 


004504 


011110 








MOV 


*Rlf #R0 


(WRITE ADDRESS NORMAL CDATI] 


1170 


004506 


0^^2777 


000004 


175106 




BIS 


«BIT2,»PAHITY 


(WRITE OTHER PARITY 


1171 


004514 


012737 


004524 


001332 




MOV 


«.*10if#SbODAT 


(STORE THt PC THAT SHOULD 


1172 
















(BE PUSHEU ON THE STACK 


1173 
















(IF A PARITY ABORT OCCURS 


1174 


0O4S22 


0C0030 








CMP 


RO,»CR03* 


(DO A OATl, DATIP 


1175 


004524 


042777 


000004 


175070 




BIC 


#BIT2,#PAMITY 


(WRITE NOKMAL FOR EMT CALL 


1176 


004532 










HUT 


♦ 1 


(DIDN'T ABORT 


1177 


004534 


01^0410 








BR 


.*22 


(GO TO NEXT TEST 


1178 


004536 


042777 


000005 


175056 




BIC 


tBIT21BIT0,»PARITY 


(WRITE NOMMAL AND OISABLE 


1179 


004544 


004037 


011550 






JSR 


R0,»»CHECKLOC 


(CHECK FQM GOOD ABORT 


1180 


004550 


104003 








HLT 


♦ 3 


(ABORTED INCORRECTLY 


1181 


004552 


012706 


001100 






MOV 


#STACK,SP 


(RESET THt STACK 


1182 










I***************************************************************** 


1183 










JTEST 


17 


TEST CAOO^ESS) SM0,DM3 CMP INSTMUCTION 


1184 










r***************************************************************** 


1185 


004556 


000004 






T5Tl7t 


SCOPE 






1186 










J 




11/45 ••** ROM STATE 


221 **** 



MAINDEC-ll-DCKBR-t MACYll 27C657) 2KI-MAY-75 14:33 PAGE 25 

OCKBRE.Pll CPU PARITY TEST MAIN FLOW 



1187 










; 








1188 










( 


11/40 


**** ROM STATE 264 *«** 




1189 


004560 


004015 








JSR 


R0, CR55 


(SET UP PARITY VECTOR SERVICE 


1190 


004562 


0I<)4612 








B4 




(ROUTINE ADDRESS 


1191 


004564 


011100 








MOV 


fRl,R0 


(SET UP FUR A DATO 


1192 


004566 


010010 








MOV 




(DO THE 0*T0 


1193 


004570 


012737 


004600 


001332 




MOV 


i. + lOfPtStiODAT 


(STORE THt PC THAT SHOULD 


1194 
















(BE PUSHEU ON THE STACK 


1195 
















(IF A PARiTY ABORT OCCURS 


1196 


004576 


0ci0i33O 








CMP 


R0,»CR0)t 


(DO A DATI 


1197 


004600 


042777 


000004 


175014 




BIC 


«8IT2.»PAKITY 


•WRITE NOMMAL FOR EMT CALL 


1198 


004606 


104001 








HLT 


♦ 1 


(DIDN'T ABORT 


1199 


004610 


000410 








BR 


1+22 


(GO TO NEXT TEST 


1200 


004612 


042777 


000005 


175002 


8«: 


BIC 


#8IT2JBIT0, •PARITY 


(WRITE NONMAL AND DISABLE 


1201 


004620 


0W4037 


011550 






JSR 


R0,f«CHECKLOC 


(CHECK FOX GOOD ABORT 


1202 


004624 


104003 








HLT 


+3 


(ABORTED J.NCORRECTLY 


1203 


004626 


012706 


001100 






MOV 


•STACK. SP 


(RESET THt STACK 


1204 










(************* 


************************ 


**************************** 


1205 










(TEST 


20 


TEST DATI CDATAJ SM0, 


DM5 CMP INSTRUCTION 


1206 










1 ************* 


************************ 


**************************** 


1207 


004632 


000004 






Ti»T20: 


SCOPE 






1208 










( 




11/45 *•** ROM STATE 


177 **** 


1209 










( 








1210 










( 


11/40 


*••* ROM STATE 267 •*** 




1211 


004634 


001015 








JSR 


R0, CR5) 


(SET UP PARITY VECTOR SERVICE 


1212 


004636 


004706 








B5 




(ROUTINE ADDRESS 


1213 


004640 


011100 








MOV 


»R1,R0 


(SET UP FOR A DATO 


1214 


004642 


042777 


000004 


174752 




BIC 


•BIT2,#PANITY 


(WRITE NOMMAL 


1215 


004650 


010060 


177776 






MOV 


R0,-2CR0) 


(DO THE D*TO 


1216 


004654 


0^2777 


000004 


174740 




BIS 


•BIT2, •PARITY 


(WRITE OTHER PARITY 


1217 


004662 


OUllO 








MOV 


•R1,#R0 


(DO THE D*TO 


1218 


004664 


012737 


004674 


001332 




MOV 


#. + 10,*#SI>DDAT 


(STORE THt PC THAT SHOULD 


1219 
















(BE PUSHEU ON THE STACK 


1220 
















(IF A PARITY ABORT OCCURS 


1221 


004672 


020050 








CMP 


R0,#-CR03 


(DO A DATi, DATIP 


1222 


004674 


042777 


000004 


174720 




BIC 


#BIT2,»PAKITY 


(WRITE NQKMAL FOR EMT CALL 


1223 


004702 


104001 








HLT 


+ 1 


(DIDN'T ABORT 


1224 


004704 


010410 








BR 


.*22 


•GO TO NEXT TEST 


1225 


004706 


042777 


000005 


174706 




BIC 


#8IT21BIT0,#PARITY 


(WRITE NONMAL AND DISABLE 


1226 


004714 


004037 


011550 






JSR 


Re,»#CHECKLOC 


(CHECK FQN GOOD ABORT 


1227 


004720 


104003 








HLT 


♦ 3 


•ABORTED INCORRECTLY 


1228 


004722 


012706 


001100 






MOV 


•STACK, SP 


•RESET THt STACK 


1229 










(***************************************************************** 


1230 










(JEST 


21 


TEST (ADDKESS) SM0,OM5 CMP INSTHUCTION 


1231 










(••*»• 


*****••••*••***********•*•*****••••**•***•*•*******•*••*•*•• 


1232 


004726 


000004 






T*T21« 


SCOPE 






1233 










• 




11/45 *••* ROM STATE 


231 ***• 


1234 










1 








1235 










( 


11/40 


*••• ROM STATE 264 **** 




1236 


004730 


004015 








JSR 


R0, CR5} 


•SET UP PARITY VECTOR SERVICE 


1237 


004732 


004766 








B6 




(ROUTINE ADDRESS 


1238 


004734 


011100 








HOV 


*R1,R0 


(SET UP FOR A DATO 


1239 


004736 


010010 








MOV 


R0, CR0} 


(DO THE D*TO 


1240 


004740 


062700 


000002 






ADD 


*2,R0 
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1241 


004744 


012737 


004754 


001332 




MOV 


*.«10i*#SI>DDAT 


rSTORE THt PC THAT SHOULD 


1242 














IBE PUSHEU ON THE STACK 


1243 
















HF A PARiTY ABORT OCCURS 


1244 


BB4752 


020050 








CMP 


RBf f-(R0] 


»D0 A OATl 


1245 


004754 


042T77 


000004 


174640 




BIC 


••IT2»»PAKITY 


fMRITE NOMMAL FOR EMT CALL 


1246 


004762 


104001 








HLT 


♦ 1 


»OION'T A"»ORT 


1247 


004764 


0<d0410 








BR 


• *22 


IGO TO NE«T TEST 


1248 


004766 


042777 


000005 


174626 


06 1 


BIC 


•BIT21B1TB,»PARITY 


(WRITE NONflAL AND DISABLE 


1249 


004774 


011)4037 


011550 






JSR 


Re,*#CHECKUOC 


1 CHECK POM GOOD ABORT 


I25e 


eeseee 


*l£4003 








HLT 


♦ 3 


1 ABORTED INCORRECTLY 


1251 


005002 


012706 


001100 






MOV 


•STACK, SP 


FRESET THt STACK 


1252 










>?•"*• 


■ ■■■at*** 


*****•****•••<>••**********•*•**«*«**•*****••*•*••*•• 


1253 










1 [EST 


22 


TEST CDATA) SM2,DM0 


CMP INSTRUCTION 


1254 


















1255 


005006 


0100004 






TST22I 


SCOPE 






1256 










1 




11/45 ••*» ROM STATE 


27 «**• 


1257 










1 








1256 










t 


11/40 


***• ROM ST»TE 250 **** 




1259 


005010 


004015 








JSR 


R0, (R5} 


ISET UP P*RITY VECTOR SERVICE 


1260 


005012 


0145042 








C 




f ROUTINE ADDRESS 


1261 


00S014 


011100 








MOV 


PR1.R0 


»SET UP FOR OATO 


1262 


005016 


010010 








MOV 


R0,*R0 


»00 THE D*TO 


126! 


005020 


012737 


005030 


001332 




MOV 


•.«10,P«SbODAT 


1 STORE THt PC THAT SHOULD 


1264 
















IBE PUSHEt^ ON THE STACK 


1265 
















IIF A PARITY ABORT OCCURS 


1266 


005026 


0i!2000 








CMP 


(R0]'*'>R0 


IDO A DATl 


1267 


005030 


042777 


000004 


174564 




BIC 


•BIT2,»PAKITY 


IWRITE NOKMAL FOR EMT CALL 


1265 


005236 










HLT 


♦ 1 


fOION'T ABORT 


1269 


005040 


000410 








BR 


.«22 


(60 TO NEXT TEST 


127B 


005042 


0*2777 


000005 


174552 


c! 


BIC 


iBIT2JBITIl>,#PARITY 


IWRITE NONMAL AND DISABLE 


1271 


005050 


004037 


01 1550 






JSR 


R0,»«CHECKLOC 


ICHECK FOH GOOD ABORT 


1272 


005054 


1»4003 








HLT 


♦ 3 


lABORTEO INCORRECTLY 


1273 


005056 


012706 


001100 






MOV 


#3TACKiSP 


IRESET THt STACK 


1274 










I***************************************************************** 


1275 










MEST 


23 


TEST CDAT»5 8M4,DM0 


CMP INSTRUCTION 


1276 










f************** *********** ************ 


****•*•*•*•***•**••*•**•*•** 


1277 


005062 


0140004 






T_ST23l 


SCOPE 
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11/45 •••• ROM STATE 27 •*•» 



M*INDEC-U-DCKBH-fc 
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1279 I 

128B I 11/40 *: 

1281 005064 004015 JSR 

1282 005066 005116 C0 

1283 005070 011100 MOV 

1284 005072 010020 MOV 



r** ROM STATE 250 **** 

Ra»CR5) ISET UP P»RITV VECTOR SERVICE 

^ROUTINE ADDRESS 
•R1,R0 rSET UP FUR DATO 

R0, CR03+ >D0 THE DATO 
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1285 


005074 


012737 


005104 


001332 




MOV 


«. + 10,#*SI>DOAT 


ISTORE THt PC THAT SHOULD 


1286 
















IBE PUSHEU ON THE STACK 


1287 
















>IF A PARITY ABORT OCCURS 


1288 


005102 


024000 








CMP 


-CRU) iRO 


IDO A DAT! 


1289 


005104 


0'*2777 


000004 


174510 




BIC 


#8IT2, •PARITY 


IWRITE NOHMAL FOR EMT CALL 


1290 


005112 


i»40ai 








HLT 


♦ I 


POIDN'T ABORT 


1291 


005114 


0(^0410 








BR 


.'^22 


>G0 TO NEXT TEST 


1292 


005116 


042777 


000005 


174476 




BIC 


*8IT2:BIT*lr»PARITY 


rWRITE NQKMAL AND DISABLE 


1293 


005124 


01(14037 


011550 






JSR 


R0,*lilCHECKLOC 


ICHECK FQK GOOD ABORT 


1294 


005130 


1IH4003 








HUT 


♦ 3 


jABORTEo Incorrectly 


1295 


005132 


012706 


001100 






MOV 


«STACK,SP 


;reset THt stack 


1296 










1 ***** 


******tk***********************************ik**«************** 


1297 










>1EST 


24 


TEST (DATA) SM3,OM0 


CMP INSTRUCTION 


1298 










I***************************************************************** 


1299 


005136 


0(90004 






TST24: 


SCOPE 






1300 










; 




11/45 ••** "OM STATE 


146 *•** 


1301 










1 








1302 










> 


11/40 


***• ROM STATE 250 *•** 




1303 


005140 


0O4015 








JSR 


R0, (R5) 


ISET UP PARITY VECTOR SERVICE 


1304 


005142 


0195210 








CI 




IROUTINE ADDRESS 


1305 


005144 


011100 








MOV 


»Ri ,R0 


ISET UP FUR DATO 


1306 


005146 


010020 








MOV 


R0, CRO}f 


IDO THE DATO (DATA OTHER PARITY) 


1307 


005150 


0*2777 


000004 


174444 




BIC 


#BIT2,»PAKITY 


tWRITE NQKHAL 


1308 


005156 


011110 








MOV 


»R1,»R0 


IDO A DATU (ADDRESS NORMAL) 


1309 


005160 


0^2777 


000004 


174434 




BIS 


»BIT2,#PAKITY 


IWRITE OTHER PARITY 


1310 


005166 


012737 


005176 


001332 




MOV 


«.«t0i*«l$*>DDAT 


ISTORE THt PC THAT SHOULD 


1311 
















IBE PUSHEU ON THE STACK 


1312 
















IIF A PARITY ABORT OCCURS 


1313 


005174 


023000 








CMP 


*CR0)4'iR0 


IDO A DATI 


1314 


005176 


0«2777 


000004 


174416 




BIC 


#BIT2,#PAKITY 


IWRITE NORMAL FOR EMT CALL 


1315 


005204 


1104001 








HLT 


+ 1 


IDION'T ABORT 


1316 


005206 


0ii'0410 








BR 


.+22 


IGO TO NEXT TEST 


1317 


005210 


0*2777 


000005 


174404 


Cll 


BIC 


#BIT2!BITH, •PARITY 


IWRITE NORMAL AND DISABLE 


1318 


005216 


0B4037 


011550 






JSR 


R0,#«CHECKLOC 


ICHECK FON GOOD ABORT 


1319 


005222 


104003 








HLT 


+3 


lABORTED INCORRECTLY 


1320 


005224 


012706 


001100 






MDV 


#STACK,SP 


IRESET THt STACK 


1321 










y************* 


**********•****************••••••***•*•••••**••••••* 


1322 










HEST 


25 


TEST (DATA) SMS, DM0 


CMP INSTRUCTION 


1323 










f ****•*•*••••* 


A**********************-* 


•*************************** 


1324 


005230 


0190004 






TST25! 


SCOPE 






1325 










1 




11/45 **** ROM STATE 


146 *••* 


1326 










t 








1327 










1 


11/40 


**•• ROM STATE 250 **** 




1328 


005232 


084015 








JSR 


RO, (R53 


ISET UP PARITY VECTOR SERVICE 


1329 


005234 


015304 








C2 




IROUTINE ADDRESS 


1330 


005236 


011100 








MOV 


fRl,R0 


ISET UP FUR A DATO 


1331 


005240 


042777 


000004 


174354 




BIC 


#BIT2,»PAKITY 


IWRITE NORMAL 


1332 


005246 


010060 


177776 






MOV 


R0,-2CR0] 


IDO A DATU (ADDRESS NORMAL) 


1333 


005252 


0!»2777 


000004 


174342 




BIS 


#BIT2,#PAKITY 


IWRITE OTHER PARITY 


1334 


005260 


011110 








MOV 


«R1,»R0 


100 A DATU (DATA OTHER PARITY) 


1335 


005262 


012737 


005272 


001332 




MOV 


f. + lOfffStiOOAT 


ISTORE THt PC THAT SHOULD 


1336 
















IBE PUSHEU ON THE STACK 


1337 
















IIF A PARITY ABORT OCCURS 


1338 


005270 


0(!5000 








CMP 


*-CRe] ,R0 


100 A OAT'l 
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1339 


205272 


0<»2777 


000004 


174322 




BIC 


i9IT2,»P»KlTY 


MRITE NOMMAU FOR EMT CAUU 


1 340 


005300 










HUT 


♦ 1 


lOION'T ABORT 




005302 


Iflwlem 1 








BR 




ICO TO NEXT TEST 


1342 


905304 


0*2777 






C«!« 


exc 


•BIT2IBITHI,»PAR1TY 


IWRITE NOKMAU AND OISABUE 


1343 


00531 2 


0*^4037 


01 1550 






JSR 


R8,»#CHEC*U0C 


ICMECK FOK GOOD ABORT 


1344 


005316 










HUT 


♦ 3 


1 ABORTED INCORRECTLY 


1345 


005320 


012706 


Vv I iW 






MOV 


#STACK(SP 


IRE8ET THt STACK 


1346 










I*************************************** I******* ************ ****** 


1347 










»IEST 


26 


TEST (DAT*) SMI, DM0 


CMP INSTRUCTION 


1 346 










f********* ************************************************** ****** 


1349 


005324 


0K)0004 














1350 










r 




11/45 *•** BOH STATE 


27 


1 35 1 










f 








1352 










1 


11/40 


***• ROM STATE 250 **** 




1353 


005326 


0^4015 








JSR 


RO, (R5] 


ISET UP PARITY VECTOR SERVICE 


1354 


005330 


0^5360 








C3 




IROUTINE ADDRESS 


1355 


005332 


1 1 1 00 








MOV 


*R1,R0 


ISET UP FUR OATO 


1356 


005334 


010010 








MOV 


Re,*R0 


>D0 THE DATO 


1357 


005336 


012737 


005346 


001332 




MOV 


«, + 10f *«St^DDAT 


rSTORE THt PC THAT SHOUUD 


1358 
















fBE PUSHEU ON THE STACK 


1359 
















IIF A PARITY ABORT OCCURS 


1360 


005344 


1 020 








CMr 


'Rb,R0 


J DO * DAT! 


1361 


005346 


0'*2777 


000004 


174246 




BIC 


«BIT2, •PARITY 


IWRITE NQKMAU FOR EMT CAUL 


1 362 


005354 










HUT 


♦ 1 


IDION'T ABORT 


1363 


005356 


0^04 1 








BR 


.t22 


160 TO NEXT TEST 


1 5^4 


005360 


0427 77 


000005 


1 74234 




BIC 


•BIT21BIT«, •PARITY 


IWRITE NOMMAU AND DISABUE 


1 365 


005366 


v ■•W J 1 


01 1550 






JSR 


ROiPVCHECi^UOC 


1 CHECK FOW SOOB ABORT 


1366 


005372 


1 U40O3 








HUT 


♦ 3 


lABORTED ANCORRECTUY 


1367 


005374 


012706 


001 1 00 






MOV 


#STACKiSP 


IRESET THt STACK 


1366 










1 ********************************************************** ******* 


1369 










ITEST 


27 


TEST COATA) SH6,0M0 


CMP INSTRUCT ION 


1370 










I************* 


**************************************************** 


1371 


005400 


0U0004 






TST27I 


SCOPE 






1372 










1 




11/45 •••* ROM STATE 


142 *•*• 


1373 










f 








1374 










i 


11/40 


••** ROM STATE 250 **** 




1375 


005402 


0U4015 








JSR RO 


.(R5) 


ISET UP P»RITY VECTOR SERVICE 


1376 


005404 


0US436 








C4 




IROUTINE ADDRESS 


1377 


005406 


1 1 100 








MOv 


*Ri»fiS 


'SET UP fUR A OATQ 


1378 


005410 


010020 








MOV 


Re, CRO)* 


100 THE D«TO 


1379 


005412 


012737 


005424 


001332 




MOV 


«.«12,fiSl>DDAT 


» STORE THt PC THAT SHOUUD 


1380 
















IBE PUSHEU ON THE STACK 


1381 
















IIF A PARITY ABORT OCCURS 


1362 


005420 


0^6000 


177776 






CMP 


• 2(R0)>R0 


IDO A OATl 


1383 


005424 


0*2777 


000004 


174170 




BIC 


«8IT2,#PAHITY 


IWRITE NOMMAU FOR EMT CAUU 


1384 


B05432 


lld4001 








HUT 


*1 


lOIDN'T ABORT 


1385 


005434 


000410 








BR 




IGO TO NEXT TEST 


1386 


005436 


0'»2777 


000005 


174156 


C*! 


BIC 


*BIT21BITIi',#PARITY 


IWRITE NOMMAU AND DISABUE 


1387 


005444 


011)4037 


011550 






JSR 


RO,*«CHECKUOC 


1 CHECK FQW GOOD ABORT 


1388 


005450 


1114003 








HUT 


+3 


lABORTED INCORRECTUY 


1389 


005452 


012706 


001100 






MOV 


•STACK, SP 


IRESET THt STACK 


1390 










I *•**•***••*•* 


•**•••••*•**•**•••***•** 


**************************** 


1391 










» fEST 


30 


TEST CADOKESS) SM7,DM8 CMP INSTMUCTION 


1392 










f************************* ************ 


**************************** 
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1393 


005456 


OU0004 




1394 








1395 








1396 








1397 


005460 


0104015 




1398 


005462 


0105514 




1399 


005464 


011100 






a054hh 






1401 


005470 


012737 


005502 


1402 








1403 








1404 


005476 


0<i70eo 


177776 


1405 


005502 


0*2777 


000004 


1406 


005510 


104001 




1407 


005512 


0ID0410 




1408 


005514 


0*2777 


000005 


1409 


005522 


004037 


011550 


1410 


005526 


1U40O3 




l«ll 


005530 


012706 


001100 


1412 








1413 








1414 








1415 


005534 


0W00O4 




1416 








1417 








1416 








1419 


005536 


004015 




1420 


005540 


0ii!5570 




1421 


005542 


011100 




1422 


005544 


010010 




1423 


005546 


012737 


005536 


1424 








1425 








1426 


005554 


0(!3000 




1427 


005556 


0*2777 


000004 


1428 


005564 


1U40O1 




1429 


005566 


0klO410 




1430 


005570 


0*2777 


000005 


1431 


005576 


0104037 


0U550 


1432 


005602 


1104003 




1433 


005604 


012706 


001100 


1434 








1435 








1436 








1437 


005610 


0100004 




143e 








1439 








1440 








1441 


005612 


004015 




!44a 


005614 


0105644 




1443 


005616 


011100 




1444 


005620 


010020 




1445 


005622 


012737 


005632 


1446 









T!»T30I SCOPE 



11/45 ROM STATE 142 *<>** 



11/40 *•** ROM STATE 245 *•*• 



JSR 
C5 

MOV 
MOV 
MOV 



RO, tR5) 

*Ri,R0 

RO, (RO)* 

• .«12,*«Sl^D0AT 



CMP »-2(R0),RI0 
174112 BIC »BIT2,#PAHITY 

HUT +1 

BR .+22 
174100 C^l BIC •BIT21BITI0,#PARITY 

JSR Re,*#CHECKUOC 

HUT +3 

MOV #8TACK,SP 
I *************************** ****»i,i,**i,*i,i,i,tliiiti,tt*i,i,i,ti,i,t,i,t******i, 
I TEST 31 TEST (ADOHESS) SMS, DM0 CMP IN8TKUCTI0N 

I *••******••••**•••****•«•******•*•*******•*•***•******■,**•****•*• 
TST31I SCOPE 



I8ET UP P*RITY VECTOR SERVICE 
IROUTINE ADDRESS 
I8ET UP FUR DATO 
IDO THE D»TO 

ISTORE THt PC THAT jMDUUO 
I6E PU8HEU ON THE STACK 
IIF A PARITY ABORT OCCURS 
IDO A DATi 

IWRITE NOKMAU FOR EMT CALL 
IDION'T ABORT 
IGO TO NEXT TEST 
IWRITE NOKHAL AND DISABLE 
I CHECK FOK SOOO ABORT 
lABORTED INCORRECTLY 
IRESET THt STACK 



11/45 *•*• ROM STATE 27 *••» 



001332 



174024 C6| 



11/40 ••»• ROM STATE 245 *•*» 

JSR R0,(R5) 

C6 

MOV 
MOV 
MOV 



*R1,R0 
Ra,#R0 

• .f 10,*#SI>0DAT 



CMP nae)*,R9 

BIC #BIT2,»PAKITY 

HLT +1 

BR .*'22 

BIC #9IT21BITIIi,»PARITY 

JSR RO,>«ICHECKLOC 

HLT *S 

MOV »STACK,SP 
I ••***•*****•*****•**************•*•*•****•*****•*•*•*••*••****••* 

I (EST 32 TEST (ADDHESS) SM5,OM0 CMP INSTNUCTION 

I • A** ****••« ***•••*•**•**«****•******** A***** ••**•••••*•*•*•****•• 

TST32I SCOPE 

• !!/a? ROM STATE 27 **** 

I 



ISET UP PARITY VECTOR SERVICE 
IROUTINE ADDRESS 
ISET UP FUR A OATO 
100 THE OATO 

ISTORE THt PC THAT SHOUUD 
IBE PU8HEU ON THE STACK 
IIF A PARiTY ABORT OCCURS 
IDO A DATl 

IWRITE NOKMAU FOR EMT CAUU 
IDION'T ABORT 
IGO TO NEAT TEST 
IWRITE NOKMAU AND DISABUE 
I CHECK FOK GOOD ABORT 
lABORTED INCORRECTUY 
IRESET THt STACK 



11/40 **** ROM ST*TE 245 **** 



JSR 
C7 

MOV 
MOV 
MOV 



R0,(R5) 

•R1,R0 

R0, (R0)«' 

•.*tO,f«S&DDAT 



ISET UP PARITY VECTOR SERVICE 
IROUTINE ADDRESS 
ISET UP FUR A DATS 
IDO THE DATO 

ISTORE THt PC THAT SHOUUD 
IBE PU8HEU ON THE STACK 
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1147 






1448 


005630 


0C5000 


1449 


005632 


0'*2777 


I45e 


005640 


1 04001 


1451 


00564S 


0(il0<( 1 


1452 


005644 


0*2777 


1453 


005652 


004037 


1454 


005656 


104003 


1455 


005660 


1 2706 


1456 






1457 






1458 






1459 


005664 


000004 


1460 






1461 






1 463 






1463 


005666 


0*4015 


1464 


00567B 


005742 


1465 


005672 


01 1 100 


1466 


005674 


042777 


1 467 


005702 


010060 


1468 


005706 


0^2777 


1 469 


0057 1 4 


011110 


147b 


005716 


012737 


1471 






1472 






1473 


005724 


0C7000 


1474 


005730 


0**2777 


1 475 


005736 


104001 


1476 


005740 


000410 


1477 


005742 


042777 


1476 


005750 


004037 


1479 


005754 


1 04003 


1480 


005756 


1 2706 


1461 






1482 






1483 






1 484 






1485 






I486 






1487 






1488 


005764 


0040 1 5 


1489 


005766 


006020 


1490 


005770 


1 1 1 00 


1 49 1 


005772 


0^2710 


1492 


005776 


012737 


1493 






1494 






1495 


006004 


000130 


1496 


006006 


042777 


1497 


006014 


104001 


1498 


006016 


000410 


1499 


006020 


042777 


150(9 


006026 


004037 



000005 
0115S0 



000004 
177776 
000004 



177776 
000004 



000005 
011550 



001100 



006006 
006006 



000005 
011550 



173762 
173750 







IIP A PARITV ABORT OCCURS 


CMP 


««(R0] f R0 


;00 A DATI 


BIC 


»8IT2,»PAKITV 


INRITE NONHAL POR EMT CALL 


HLT 


♦ 1 


IDIDN'T ABORT 


BR 


.+22 


JGO TO NEXT TEST 


BIC 


#BIT21BIT0»»PARITY 


IMRITE NORMAL AND DISABLE 


JSR 


R0,*«CHECI^LaC 


(CHECK FOX GOOD ABORT 


HUT 


+3 


(ABORTED INCORRECTLY 


MOV 


«STACK,SP 


(RESET THt STACK 




TEST tOAT*3 SM7,OM0 


CMP INSTRUCTION 



(TEST 33 

>*•***«*•**«*«**•**•****•*«*•*•***««**•*•♦***••*•*«*»»•••*••••♦**• 

T5T33: SCOPE 



11/45 *•*• ROM STATE 146 *«*• 



11/40 ***• ROM STATE 250 *•*• 



173720 
173706 
001332 

173664 
173652 



JSR 

C8 

MOV 

BIC 

MOV 

BIS 

MOV 

MOV 



CMP 

BIC 

HLT 

BR 

BIC 

JSR 

HUT 

MOV 



Ra, CR53 
*RlrR0 

#BIT2,#PAHITY 
R0,-2(R0] 
#8IT2,»PA»<ITY 
*R1,*R0 

«.-*'12,#«S>>D0AT 



•-SCRBJ ,R0 

♦ BIT2,#PA'<ITY 

♦ 1 

#8IT21BIT0,#PARITY 
R0,##CHEC^UOC 

♦ 3 

•STACK, SP 



(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A OATO 
(WRITE NOKMAU 

(DO A DATU (ADDRESS NORMAU) 

IWRITE OTHER PARITY 

(DO A DATU CDATA OTHER PARITY) 

(STORE THt PC THAT SHOULD 

(BE PUSHEO ON THE STACK 

(IF A PARITY ABORT OCCURS 

(DO A DATl 

(WRITE NQKMAL FOR EMT CALL 

(DIDN'T ABORT 

(GO TO NEXT TEST 

(WRITE NOHMAL AND DISABLE 

(CHECK FOM GOOD ABORT 

(ABORTED INCORRECTLY 

(RESET THC STACK 



(lEST 34 TEST DM3 JMP INSTRUCTION 

; ***************************************************************** 

TST34: SCOPE 

( 11/45 **** ROM STATE 221 •**• 

( 
( 



11/40 «*** ROM ST*TE 303 **** 



001332 

173606 
173574 



D! 



JSR 
D 

MOV 
MOV 
MOV 



JMP 

BIC 

HLT 

BR 

BIC 

JSR 



R0, CR53 

»RliR0 
«OD,*R0 

• , + 10,**Sl>DOAT 



#CR03* 

#aiT2,»PAt<ITY 
+ 1 

«BIT21BITB, ♦PARITY 
R0,**CHECKLOC 



(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A OATO 
(DO THE DATD 

(STORE THt PC THAT SHOULD 
(BE PUSHEO ON THE STACK 
(IF A PARITY ABORT OCCURS 
(DO A DATX 

(WRITE NOHMAL FOR EMT CALL 

(DIDN'T ABORT 

(GO TO NEXT TEST 

(WRITE NOHMAL AND DISABLE 

(CHECK FQK GOOD ABORT 
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1501 


006032 


104003 




1502 


006034 


012706 


001100 


1503 








1504 








1505 








1506 


006040 


000004 




1507 








1508 








1509 








1510 


006042 


004015 




1511 


006044 


006076 




1512 


006046 


011100 




1513 


006050 


012720 


006064 


1514 


006054 


012737 


006064 


1515 








1516 








1517 


006062 


000150 




1518 


006064 


042777 


000004 


1519 


006072 


104001 




1520 


006074 


000410 




1521 


006076 


042777 


000005 


1522 


006104 


004037 


011550 


1523 


006110 


104003 




1524 


006112 


012706 


001100 


1525 








1526 








1527 








1528 


006116 


000004 




1529 








1530 








1531 








1532 


006120 


00401S 




1533 


006122 


006156 




1534 


006124 


011100 




1535 


006126 


012720 


006144 


1536 


006132 


012737 


006144 


1537 








1538 








1539 


006140 


000170 


177776 


1540 


006144 


042777 


000004 


1541 


006152 


104001 




1542 


006154 


000410 




1543 


006156 


042777 


000005 


1544 


006164 


004037 


011550 


1545 


006170 


104003 




1546 


006172 


012706 


001100 


1547 








1548 









HLT 
MOV 



♦ 3 

#STACK,SP 



(ABORTED INCORRECTLY 
(RESET THt STACK 



(TEST 35 TEST DM5 JMP INSTRUCTION 

I***************************************************************** 

TST35S SCOPE 

t 11/45 **** ROM STATE 231 **•* 



11/40 •**« ROM STATE 303 **** 



001332 

173530 
173516 



JSR 

00 

MOV 

MOV 

MOV 



JMP 

BIC 

HUT 

BR 

BIC 

JSR 

HUT 

MOV 



R0, CR53 

fRl>R0 

#DO0, CR0)* 

*.«10,f«SbODAT 



#-CR03 

#B1T2,»PAKITY 
+ 1 

t*22 

»bit2:bit0,#parity 
r0,*#checkuoc 

*3 

•STACK, SP 



(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A DATO 
(DO THE DATO 

(STORE THt PC THAT SHOULD 
(BE PUSHEU ON THE STACK 
(IF A PARiTY ABORT OCCURS 
(00 A DATl 

(WRITE NOHMAL FOR EMT CALL 

(DIDN'T ABORT 

(GO TO NEXT TEST 

(WRITE NOKMAL AND DISABLE 

(CHECK FOM GOOD ABORT 

(ABORTED INCORRECTLY 

(RESET THt STACK 



(TEST 36 TEST 0M7 JMP INSTRUCTION 

(■it***********************************************************)!*** 

TST36: SCOPE 

( 11/45 *•** ROM STATE 231 **** 

( 
( 



11/40 **** ROM STATE 303 **** 



001332 

173450 
173436 



DUll 



JSR 

Dl 

MOV 

MOV 

MOV 



JMP 

BIC 

HLT 

BR 

BIC 

JSR 

HLT 

MOV 



R0, tR53 

#R1,R0 

*D01, CR03* 

«.4'12,##SbDDAT 



•-2(R0) 

#BIT2,#PAHITY 

*1 

,'*'22 

#8IT21BIT0, •PARITY 

R0,»*CHECKlOC 

♦ 3 

•STACK, SP 



(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A OATO 
(00 THE OATO 

(STORE THt PC THAT SHOULD 
(BE PUSHEU ON THE STACK 
(IF A PARITY ABORT OCCURS 
(DO A DATl 

(WRITE NOMHAL FOR EMT CALL 

(DIDN'T ABORT 

(GO TO NEXT TEST 

(WRITE NOKMAL AND DISABLE 

(CHECK FOH GOOD ABORT 

(ABORTED INCORRECTLY 

(RESET THt STACK 



)********************************************************************** 



I********************************************************************** 
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jThE CONTtNTS OF THE STACK FOB THt NEXT TEST ARE AS FOLI.OW81 
J 



nST PUSH 

f 

! 

» 

rSND PUSH 

I . 
» 
I 
; 

INTH PUSH 
>NTH *1 PUSH 
»LAST PUS" - 



ADDRESS OF THE TAG 'VtCSET" CN0RMAU5 
THIS ADDRESS WOULD BE PLACED IN 
R5 UPON COMPLETION OF 'RTS R5' 
INSTRUCTION 



NO. OF PARAMETERS AS A FUNCTION 
OF MEMORY INTERLEAVING 



- MARK INSTRUCTION (OTHER PARITY) 
OLD PC FROM THE 'JSR' (NORMAL) 



;note 

» 

; 

; 
I 

>NTH 
>NTH 
J 
f 



TME test SHOULD ABORT ON ATTEMPT TO FETCH THE 
MARK INSTRUCTION (NTH +1 l^USH) 



WHEN THE PARITY ERROR OCCURS THE STACK POINTER IS 
PUSITIONEO AT THE NTH +1 HuSH, THUS GIVING, 



PUSH 
PUSH 



PS FROM PARITY ERRUR 
PC FROM PARITY ERRUR 



1564 
1SS5 
1566 
1567 
1568 
1589 
1590 
1591 
1592 
1593 
1594 
1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 



}**»*»** 



006176 011)0004 



006200 
006202 
006204 



004015 
0^6326 
0*2777 



000004 173410 



IJEST 37 

TST37: 
I 
I 
t 



TEST MAKK "POP" 



SCOPE 



MARK INSTRUCTiON 



n/45 **•• ROM STATE 260 *••• 



n/40 •••« ROM STATE 1 
JSR Re,(R5) 
EB 

BIC #BIT2,#PAHITY 



ISET UP PARITY VECTOR SERVICE 
^ROUTINE ADDRESS 
»WRITE NORMAL 



NOTE THAT THE NEXT INSTRUCTION WILL MOVE THE STALK TO PARITY AREA 
iN THE EVENT THAT NO PARITY EXISTS WHERE THE STALK IS NORMALLY 
FITTING AT 1100 
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1609 
I&IS 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
163B 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 



00621? 013706 001476 



»»NEWSTK,5p 



006216 


017702 


173224 






MOV 


fNTERAD.Ri! 


006222 


005302 








DEC 


R2 


006224 


010546 








MOV 


R5,-(SP) 


006226 


011)5702 






1*1 


TST 


R2 


006230 


01111404 








BEQ 


2$ 


006232 


005302 








DEC 


R2 


006234 


012746 


000001 






MOV 


«1,-(SP) 


006240 


000772 








BR 


IS 


006242 


0^2777 


000004 


173352 


2»: 


BIS 


#8IT2,»PA»<ITY 


006250 


017702 


173172 






MOV 


*NTERAD,Rc: 


006254 


005302 








DEC 


R2 


006256 


062702 


006400 






ADD 


«6400,R2 


006262 


010246 








MOV 


R2,-(SP) 


006264 


0*2777 


000004 


173330 




BIC 


#BIT2,»PAKITY 


006272 


010605 








MOV 


SP,R5 


006274 


010602 








MOV 


8P,R2 


006276 


005737 


001642 






TST 


•«CPU40 


006302 


001002 








BNE 


3S 


006304 


062702 


000002 






ADD 


*2,K2 


006310 


010237 


001332 




3»: 


MOV 


R2,»»SGD0*T 


006314 


004767 


000004 






JSR 


PC.MRK0 


006320 


104001 






E« 


HLT 


♦ 1 


006322 


000407 








BR 


. + 20 


006324 


000205 






MKK0I 


RTS 


H5 


006326 


0*2777 


000001 


173266 


EKi| 


BIC 


•BIT0,#PAHITY 


006334 


004037 


011550 






JSR 


R0,»«CHECKLQC 


00634U 


114003 








HLT 


*3 


006342 


013706 


001476 






MOV 


••NEwSTK,&P 



»SET THE STACK IN PARITY 
IMEMORY AKEA 

•GET THE INTERLEAVE FACTOR 
IFOR THIS CONTROLER 
fCALCULATt NO. OF PARAMETERS 
ITO BE PUSHED ON THE STACK 
»PUSH R5 LONTENTS ON STACK 
>ANY PARAMETERS TO BE 
IPUSHED ON THE STACKT 
FBRANCH ir NO 

ISUBTRACT 1 FROM PARAMETER COUNT 
fPUSH PARAMETER ONTO STACK 
IGO BACK 10 SEE IF ANY MOREl 
IWHITE OTHER PARITY 
IGET THE INTERLEAVE FACTOR 
»FOR THIS CONTROLLER 
ICALCULATt NO. OF PARAMETERS 
»THAT WERt TO BE PUSHED ON THE 
ISTACK 

ICALCULATt THE CORRESPONDING 
IMARK INSTRUCTION 
IPUSH MAR^ INSTRUCTION ON STACK 
IWRITE NOMMAL 

IPL*CE MAKK INSTRUCTION ADDRESS 
UNTO R5 l-OR RTS 
IGET THE fC OF THE MARK 
lINSTHUCTiON 
lARE WE ON AN 11/40T 
IBRANCH If YES 
lAND DON'T STEP UP THE PC 
IIT WON'T'bE updated ON THE 
IPARITY ABORT 
I STEP UP I HE PC 
IIT WILL BE UPDATED ON THE 
IPARITY ABORT 
ISTORE THIS VALUE OF PC 
I THAT SHOULD BE PUSHED ON THE 
ISTACK IF A PARITY ABORT OCCURS 
ISU8R0UTINE CALL 
IDIDN'T ABORT 
IGO TO RESET THE STACK 
IRETURN FMOM SUBROUTINE 
lOISABLE ►'ARITY 
ICHECK FOK GOOD ABORT 

IRESET THt STACK 
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> 

t 

>THE CONTfcNTS OF THE STACK FOR THt NEXT TEST ARE AS FOLLOWS 

; 

nST PUSH - ADDRESS OF THE TAG 'VtCSET' (OTHER PARITY) 
t THIS ADDRESS WOULD BE PLACED IN 

t R5 UPON COMPLETION OF 'RTS R5' 

;2ND PUSH 

; 
1 
; 
; 

JNTH PUSH 

JNTH *l PUSH - MARK INSTRUCTION INORMAL) 
JLAST PUSH - OLD PC FROM THE 'JSR* (NORMAL) 

; 

JNOTE; the TEST SHOULD FAIL ON ATTEMPT TO RESTORE 
1 R5 CONTENTS (1ST PUSH) 



NO. OF PARAMETERS AS A FUNCTION 
OF MEMORY INTERLEAVING 



WHEN THE PARITY ERROR OCCURS THE STACK POINTER IS 
PHOPERLY UPDATED, THUS GIVING, 

1ST PUSH - PS FROM THE PARITY ERKQR 
ZW PUSH - PC FROM THE PARITY ERHOR 



*************************************************** A, j)t 



1695 






1696 






169T 






169? 


006346 


012705 


1699 






1700 






1701 






1702 






1703 






1704 


006352 


01^0004 


1705 






1706 






1707 






1708 


006354 


0I<!401S 


1709 


006356 


0><>6510 


1710 


006360 


017702 


1711 






1712 


006364 


0135302 


1713 






I7ia 


006366 


042777 


1715 


006374 


005737 


1716 


006400 


0101407 



MOV 



•VECSET.RS 



IRESTORE IHE PARITY VECTOR 
fSERVICE ADDRESS SETUP ROUTINE 
MDDRESS 

lEST 40 TEST OLU REGISTER CONTENTS MAHK INSTRUCTION 

»T40: SCOPE 

11/45 **** ROM STATE 235 *»** 



11/40 ROM STATE 356 **** 



000004 
001642 



JSR 

E2 

MOV 



BIC 
TST 
BEQ 



Ra, (RS) 
•NTERAOjRi 

R2 

#BIT2,#PA«ITY 

»«CPU40 

3S 



ISET UP PARITY VECTOR SERVICE 

JROUTINE ADDRESS 

IGET THE INTERLEAVE FACTOR 

IFOR THIS CONTROLLER 

»CALCULATt NO, OF PARAMETERS 

ITO BE PUSHED ON THE STACK 

IWRITE NOHMAL 

MRE ME ON AN 11/407 

IBRANCH II- NO 



MAINDEC 


-ll-DCK8R«t 


MACYU 


27C657) 


210-MAY 
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DCKBRE.PU 




CPU PARITY TEST 


MAIN FLOW 






1717 
















rOATA HILL BE TAKEN FIRST AND 


1718 
















»THEN THE PC UPDATED 


1719 


00640S 


013700 


001476 






MOV 


*«N1:WSTK,H0 


rSET THE iNITIAL STACK POINT 


1720 


006406 


162700 


000002 






SUB 


#2,R0 


rOROP DOWN 1 WORD ADDRESS 


1721 
















»BECAUSE IHE PC WILL BE UPDATED 


1722 
















JFIRST THEN THE DATA TAKEN 


1723 


006412 


010037 


001332 






MOV 


R0,»*SGDDAT 


ISTORE THiS VALUE AS THE PC 


1724 
















»THAT SHOULD BE PUSHED ON THE STALK 


1725 
















»IF A PARITY ABORT OCCURS 


1726 


006416 


0(30403 








BR 


4S 


fCONTINUE WITH TEST 


1727 


006420 


012737 


006502 


001332 


3»: 


MOV 


*E1,>#SGDUAT 


rSTORE THt PC THAT SHOULD 


1728 
















rBE PUSHEU ON THE STACK 


1729 
















>IF A PARjlTY ABORT OCCURS 


1730 


006426 


0512777 


000004 


173166 


4»l 


BIS 


#eiT2,»PAKITY 


rWRITE OTHER PARITY 


1731 


006434 


010546 








MOV 


RS,-(SP) 


rSTORE OLU R5 CONTENTS ON STACK 


1732 


006436 


042777 


000004 


173156 




BIC 


#6IT2,#PAKITY 


rWRITE NO«MAL 


1733 


006444 


01*5702 






l»: 


TST 


R2 


>ANY PARAHETERS TO BE PUSHED 


1734 
















»0N THE SUCK? 


1735 


006446 


0t)1404 








BEQ 


2S 


IBRANCH I^ NO 


1736 


006450 


005302 








DEC 


R2 


ISUBTRACT'I from PARAMETER COUNT 


1737 


006452 


012746 


000001 






MOV 


•l,-(SP) 


IPUSH PARAMETER ON STACK 


1738 


006456 


06)0772 








BR 


IS 


IGO BACK 10 SEE IF ANY MOREl 


1739 


006460 


017702 


172762 




2»l 


MOV 


•NTERAD,R<: 


IGET THE Interleave factor 


1740 
















IFOR THIS CONTROLLER 


1741 


006464 


0ID5302 








DEC 


R2 


ICALCULATt NO. OF PARAMETERS 


1742 
















ITHAT WERb TO BE PUSHED ON THE 


1743 
















ISTACK 


1744 


006466 


062702 


006400 






ADD 


«6400,R2 


ICALCULATt THE CORRESPONDING 


1745 
















IMARK INS1RUCTI0N 


1746 


006472 


010246 








MOV 


Ra,-CSP) 


IPUSH MARI< INSTRUCTION ON STACK 


1747 


006474 


010605 








MOV 


SP,R5 


IPLACE MAHK INSTRUCTION ADDRESS 


1748 
















UNTO R5 ran rts 


1749 


006476 


004767 


000004 






JSR 


PC,MRK1 


ISUBROUTINE CALL 


1750 


006502 


1^4001 






El: 


HLT 


♦1 


IDIDN'T ABORT 


1751 


006504 


0li)0407 








BR 


.'*'20 


IGO TO RESET THE STACK 


1752 


006506 


0140205 






MHKi: 


RTS 


RS 


IRETURN FHOM SUBROUTINE 


1753 


006510 


042777 


000001 


173104 


E«i; 


BIC 


#9IT0,#PAHITY 


lOISABLE fARITY 


1754 


006516 


0104037 


011550 






JSR 


R0,**CHECl^LOC 


ICHECK FOH GOOD ABORT 


1755 


006522 


104003 








HLT 


♦ 3 


IA80RTED INCORRECTLY 


1756 


006524 


013706 


001476 






MOV 


••NtWSTK,^P 


IRESET THt STACK 


1757 


006530 


012705 


011450 






MOV 


•VECSET.RS 


IRESTORE IHE PARITY VECTOR 


1758 
















ISERVICE ADDRESS SETUP ROUTINE 


1759 
















1 ADDRESS 


1760 










I************************************* 


**************************** 


1761 










IJEST 


41 


TEST SOB BRANCH SOB INSTRUCTIUN 


1762 










1 ■**•**•***••**•**•• ************** 


**************************** 


1763 


006534 


000004 






TST4H 


SCOPE 






1764 










1 




11/45 **** ROM STATE 


260 *•«* 


1765 










1 








1766 










1 


11/40 


**•• ROM STATE 1 **** 




1767 


006536 


004015 








JSR 


R0, (R5) 


ISET UP PARITY VECTOR SERVICE 


1768 


006540 


0106644 








F0 




IROUTINE ADDRESS 


1769 


006542 


042777 


000004 


173052 




BIC 


•9IT2,#PAMITY 


IWRITE NOHHAL 


1770 


006550 


012700 


000004 






MOV 


#4,R0 


IMOVE A NUMBER >1 TO R0 SO THAT 
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17T1 
1772 
1773 
1770 
1775 
1776 
177T 
1778 
1779 
1780 
1781 
1782 
1783 
1784 
1785 
178(1 
1787 
178B 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
179b 
179T 

1 TOJ 

1799 
1800 
1801 
1802 
1803 
1804 
1805 
1806 
1807 
1808 
1809 
IBia 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 



006554 
006556 
006562 
006566 
006570 



006574 
006576 



006606 
006614 



006620 
006626 



006636 
006640 
006642 
006644 
006652 
006656 
006660 



006666 
006670 
006672 
006674 

006700 
006706 



011102 
013703 
0105737 
0^1403 
062703 



002703 



006602 010337 



0S2777 
012T22 



0'*2777 
012712 



0(94342 



1124001 
0(10407 
0?7004 
0t2777 
004037 
t«4003 
013706 



006664 0li>0004 



0104015 
006774 
011100 
017702 

0*2777 
0M5702 



001476 
001642 

000002 

000004 

001332 



000004 
000240 



000004 
000203 



1»J 

2a: 



173006 



000001 
011550 



172750 FBI 



NOV 
HOV 
TST 
BEQ 
ADO 



SB 
AOD 



BIS 
MOV 



BIC 

MOV 



HUT 
BR 
SOB 
BIC 
JSR 
HLT 
MOV 

I ********** 

JFEST 42 

T*T42l 
I 



»Rt(R2 
#»NEWSTK,X3 
#«CPU40 
16 

• 2.R3 



2S 

#4,R3 



R3,I>*S(;0DAT 



•8IT2,#PAKITY 
•240, (R2)+ 



#6IT2, •PARITY 
*203i#R2 



R1.-CR2) 



+ 1 

.«20 
R0,F 

•8IT0, •PARITY 
R0,#*CHECKLOC 
+ 3 

#«NENSTK|!>P 



IWHEN DECKEMENTEO BY "SOB" THE 

(RESULT WUN'T BE 

ISET UP FUR A DATO 

(GET THE INITIAL TEST POINT 

I ARE we ON AN 11/«B» 

(BRANCH IP NO 

ISTEP UP i WORD 

(SINCE TH6 PC WILL NOT BE 

(UPDATED UN THE PARITY ABORT 

(50 TO STURE THIS VALUE 

(STEP UP <! WORDS 

(SINCE THt PC WILL BE UPDATED 

(ON THE PARITY ABORT 

(STORE THIS VALUE OF PC 

(THAT SHOULD BE PUSHED ON THE 

(STACK IF A PARITY ABORT OCCURS 

(WRITE OTHER PARITY 

(INSTRUCTION TO BE DONE ON 

(COMPLETIUN OF SOB INSTRUCTION 

(THE INSTKUCTION WILL BE IN 

(PARITY HtMORY A3 DESIGNATED BY 

(THE CONTtNTS OF Rl 

(WRITE NORMAL 

(MOVE AN NTS R3 INTO THE LOCATION 

(FOLLOWINi< THE INSTRUCTION TO BE 

(EXECUTED' IN PARITY MEMORY IN 

(CASE IT UOESN'T ABORT 

ICQ TQ SOB TNSTRUCTtON 

(THE INSTKUCTION TO BE DONE ON 

(COMPLETION OF SOB EXECUTION IS 

(PLACED HtRE 

(DIDN'T ABORT 

(SO TO RE»ET THE STACK 

(EXECUTE THIS INSTRUCTION 

(DISABLE Parity 

(CHECK FOK GOOD ABORT 
(ABORTED INCORRECTLY 
(RESET THt STACK 



TEST SM0JDM0 MOV INSTRUCTION 



11/45 *•** ROM STATE 20 *•** 



11/40 *•*• ROM STATE I **** 



172546 
000004 



JSR 
Fl 
MOV 
MOV 

BIC 
TST 



R0, CR5] 



#RlrR0 
#NTERAO,R<f 



•8IT2»»PAHITY 

R2 



006710 0101404 



(SET UP PARITY VECTOR SERVICE 

(ROUTINE ADDRESS 

(SET UP FOR A DATO 

(GET THE INTERLEAVE FACTOR 

(FOR THIS CONTROLLER 

(WRITE NONHAL 

(ANY 'NOV R0,R0'S TO BE SHOVED 
(INTO PARITY MEMORY AHEAT 
(BRANCH I* NO 
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1825 


006712 


0105302 








DEC 


R2 


1826 
















1827 


006714 


012720 


010000 






MOV 


«0t0000, (H0]'» 


1828 
















1829 


006720 


000772 








BR 


IS 


1830 


006722 


0^2777 


000004 


172672 


2*1 


BIS 


•8IT2,»PAHITY 


1831 


006730 


012720 


010000 






MOV 


#010000, C^O}* 


1832 
















1833 
















1834 


006734 


0«277T 


0(10004 


17?66n 




Bin 


•BTT?.«PAKTTy 


1835 


0B6742 


012710 


000203 






MOV 


#203, 'CR03 


1836 
















1837 
















1838 
















1839 


006746 


01^5737 


001642 






TST 


*#CPU40 


1840 


006752 


0101402 








BEC 


3S 


1841 
















1842 
















1843 


006754 


162700 


000002 






SUB 


«2,R0 


1844 
















1845 
















1846 


006760 


010037 


001332 




3»l 


MOV 


R0,##SGDDAT 


1847 
















1848 
















1849 


006764 


004371 


000000 






JSR 


R3,#CRn 


185 ( 


006770 


1104001 








HLT 


♦ i 


I85i 


006772 


0KI0406 








BR 


.♦16 


1851 


006774 


042777 


000001 


172620 


Fl« 


BIC 


#8IT0,»PAHIT¥ 


1855 


007002 


004037 


011550 






JSR 


R0,##CHECKLOC 


185« 


007006 


104003 








HLT 


♦ 3 


1855 


007010 


013706 


001476 






MOV 


•#NEWSTK,ap 


1856 
















1857 
















185" 

















(SUBTRACT 1 FROM INSTRUCTION 
(COUNT 

(MOVE THE INSTRUCTION 'MOV R0,R0' 

(TO PARITY AREA 

(GO BACK 10 SEE IF ANY MORE! 

(WRITE OTHER PARITY 

(MOVE THE INSTRUCTION 'MOV R0,R0' 

(INTO THE NEXT WORD LOCATION AFTE^ 

(THE PREVIOUS 'MOV RB,R0' INSTRUCTION 

IWPTTF NQKMAL 

(MOVE'RTS R3' INTO NEXT WORD 
(LOCATION AFTER THE PREVIOUS 
CMOV R0,K0r INSTRUCTION IN CASE 
(A PARITY ABORT DOESN'T OCCUR 
(ARE WE OH AN 11/40T 
(BRANCH f NO 

(SINCE PC WILL BE UPDATED ON THE 

(PARITY ABORT 

(DROP BACK 1 WORD ADDRESS 

(SINCE THt PC WILL NOT BE 

(UPDATED ON THE PARITY ABORT 

(STORE THt PC THAT SHOULD 

IBE PUSHEO ON THE STACK 

(IF A PARITY ABORT OCCURS 

(GO TO PA»<ITY MEMORY AREA 

(DIDN'T ABORT 

(GO TO RESET THE STACK 

(DISABLE fARITY 

(CHECK FOH GOOD ABORT 

(ABORTED INCORRECTLY 

(RESET THt STACK 



(A********************************************************************* 
(D********************************************************************* 

( 
( 

(THE CONTtNTS OF THE STACK FOR THt NEXT TEST ARE AS FOLLOWSl 
( 

(1ST PUSH - OLD H3 FROM THE 'JSR" (OTHER PARITY) 
( 

(NOTE( THE TEST SHOULD FAIL ON ATTEMPT TO RESTORE 

( Hi CONTENTS (1ST PUSH) 

( 

(A********************************************************************* 



1»78 
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1879 








tsse 








1(61 








1182 


007014 


0lf!l0004 




1183 








11 84 








It 65 








1866 


0137016 


0U4015 




1687 


007020 


0ID7066 




1688 


007022 


042777 


000004 


1889 


B07030 


012700 


007056 


1890 


007034 


012737 


007052 


1691 








1892 








1893 


007042 


0!'2777 


000004 


1S94 


a07P5C1 


0M4320 




1395 


207752 


11^4001 




1 59fe 




0l'0412 




1397 


037^56 


042777 


000094 


1596 




3^13203 




1S99 




?'*2777 


000001 




C7"3)7a 


324037 


01 1550 


1971 




11J4003 




192? 


Ze712i? 


01 J7Pfc 


001476 


19'?? 








19?a 








19?5 









TST43J SCOPE 
I 



11/45 **•• ROM STATE 224 ***» 



11/40 •««« ROM ST*TE 325 *•*• 



172572 
001332 



172536 G- 
172526 Gifl! 



JSR 

G0 

BIC 

MOV 
MOV 



SIS 

JSR 

HUT 

BO 

5IC 

PTS 

SIC 

JSR 

»L1 

MOV 



R0, CR5) 

*8IT2,#PAKITY 
iG,R0 

«.*16.»#SI»D0AT 



«SIT2, •PARITY 
RJ, CR0J + 
+ 1 

.♦26 

*BIT2.#PAt<ITY 

R3 

«61T0,»PAKITY 
R«S,(»«CHeCi^LOC 

+i 

<»ifN£WSTK,sp 



ISET UP PARITY VECTOR SERVICE 
^ROUTINE ADDRESS 
;WRITE NOKMAL 

;SET UP A SUBROUTINE ADDRESS 
;STDRE THt PC THAT SHOULD 
;eE PUSHEU ON THE STACK 
;IF A PARITY ABORT OCCURS 
-•WRITE 0T1ER PARITY 

;sueHouTiNE call 

;didn't abort 

;c0 to reset the stack 

? write "joxial 

;9eturn f«om subroutine 

;0ISA9LE i-ARITY 
-•CHECK F0'< GOOD ABORT 
;*9OHTE0 iMCORRECTLY 
-■RESET THt STACK 



liii*********************^******************!,*************************** 



THE CONTtNTS OF THE STACK FOR THt NEXT TEST ARE AS FOLLOWS: 



1ST PUSH - OLD PS FOR 'RTI' 
PND PUSH - OLD PC FOR 'RTI' 



COTHtR PARITY) 
COTHtR PARITY) 



NOTE: THE TEST SHUULD FAIL ON ATTEMPT TO 'POP' 
THE OLD PC C2ND PUSH) 

w"EN THE PARITY ERROR OCCURS THE STACK POINTER 
I» POSITIONED AT THE 1ST ''USH, THUS GIVING, 
THE 'NEW PS FOR THE RTI INSTRUCTION WHICH 
UiLL OVERLAY THE OLO PC StT UP FOR THE 'RTI" 
INSTRUCTION C2ND PUSH) THUS GIVING, 

1ST PUSH - OLO PS FOR 'RTI' COTHtR PARITY) 
2ND PUSH - NEW PS FROM THE 'RTI' 

3RD PUSH - NEW PC FROM THE 'RTI' 



li************************************************!!*********** ********* 
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1935 








1936 








1937 








1938 








1939 








1940 


007106 


0^0004 




1941 








1942 








1943 








1944 


007110 


0t94015 




1945 


007112 


011)7150 




1946 


007114 


012746 


000340 


1947 


007120 


012746 


007134 


1946 


007124 


012737 


007134 


1949 








1950 








1951 


007132 


01(10402 




1952 


007134 


|li)4001 




1953 


007136 


0U0412 




1954 


007140 


042777 


000004 


1955 


007146 


000002 




1956 


007150 


042777 


000001 


1957 


007156 


0B4037 


011550 


1951 


007162 


111)4003 




1959 


007164 


013706 


001476 


1940 








1 '<1 








1 M2 









jiEST 44 TEST ISi POP RTI INSTRUCTION 

;***•********•••**************************•**•***•***•************ 

TaT44» SCOPE 



11/45 *•** ROM STATE 212 *«** 



11/40 ••** ROM STATE 320 •*** 



172454 H; 
172444 HU: 



JSR 

H0 

MOV 

MOV 

MOV 



BR 

HLT 

BR 

BIC 

RTI 

BIC 

JSR 

HLT 

MOV 



R0, CRS) 

#340, -(SPJ 

#H1,-(SP) 

*H1,#*$GDUAT 



♦ 1 

.♦26 

#8IT2,»PAHITY 

*B1T0,#PAKITY 
R0,««CHECl<LOC 
+3 

#»NEWSTK,!>P 



ISET UP PARITY VECTOR SERVICE 
IROUTINE ADDRESS 
>SET PS FUR »RTI« 
>5ET RETURN FROM 'RTI' 
ISTORE THt PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
I IF A PARITY ABORT OCCURS 

;go do 'RTI» 

JOIDN'T ABORT 

»G0 TO RE»ET THE STACK 

rWRITE NOHMAL 

JRETURN FHQM INTERRUPT 

(DISABLE PARITY 

>CHECK FOX GOOD ABORT 

(ABORTED INCORRECTLY 

IRESET THt STACK 



till****************************************************** ************* 
*t*»***li***»ll*1i*******t**t***t* ************************** ************* 



THE CONTtNTS OF THE STACK FOR THt NEXT TEST ARE AS FOLLO»*S: 

1ST PUSH • OLD PS FOR 'RTI* (OTHtR PARITY) 
2N0 PUSH - OLD PC FOR 'RTI' (OTHtR PARITY) 

NOTE: THE TEST SHOULD FAIL ON ATTEMPT TO 'POP' 
fie OLD PS (1ST PUSH) 

THE 2ND PUSH IS REWRITTEN NORMAL BEFORE 
DUING THE 'RTI' 

WHEN THE PARITY ERROR OCCURS THE STACK 
PUINTER IS PROPERLY UPDATtD AND THE NEW 
PS AND PC FROM THE RTI INSTRUCTION IS 
PUSHED ONTO THE STACK, THUS GIVING, 



1ST PUSH 
;2ND PUSH 



NEW PS FROM 'RTI' CNOHMAt) 
NEW PC FROM 'RTI' (NQHMAL) 
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1993 
















1995 








1996 








1997 








ma 


007170 


01190004 




19«9 
















2 It 1 








2>1 2 


007172 


0194015 




2903 


007174 


01^7242 




2(04 


007176 


012746 


0003ti0 


1005 


0072B2 


012746 


007216 


2006 


007206 


012737 


007216 


2007 








200S 








2309 


007214 


0100402 




2010 


007216 


1(94001 




2011 


007220 


0130416 




2012 


007222 


a*'2777 


000005 


2IZI13 


007230 


012646 




291& 








28li 


007232 


aS2777 


000001 


2016 


007240 


0«)0002 




2017 


007242 


042777 


000001 


2016 


007250 


0U4037 


011550 


2019 


007254 


1104003 




2020 


007256 


012706 


001100 


2021 








2 '22 








2(23 








11 24 








C025 








2aa6 








2027 


007262 


0100004 




2028 








2029 








2030 








2031 


007264 


0B4015 




2032 


007266 


0B7320 




2033 


307270 


011100 




2034 


0(»727a 


010020 




2035 


BH7274 


012737 


007306 


2036 








2037 








2038 


007302 


0l>6000 


177776 


2039 


007306 


042777 


000004 


2040 


007314 


1104001 





fiEST 45 



TEST 2NU POP RTI INSTRUCTION 



T*T45I 

r 
t 
I 



11/45 •»*• ROM STATE 214 «*«• 
U/40 ••»* KOM STATE 322 •«»* 



172362 
172352 



JSR R0,CR5J ISET UP PARITY VECTOR SERVICE 

H2 (ROUTINE ADDRESS 

HOV #34B,-CSPj ISET PS FOR 'RTI» 

MOV #H3,-CSP3 ;SET RETURN FROM 'RTI* 

MOV #H3,»#SGDUAT I STORE THt PC THAT SHOULD 

I8E PU5HEU ON THE STACK 
IIF A PARITY ABORT OCCURS 
ISO 00 «R1I' 
joiDN'T ABORT 
IGO TO RESET THE STACK 
INRITE NOKHAL AND DISABLE PARITY 
(WRITE 1ST "-POP" NORMAL SO NO 
■ CfaoQo utCi OCCUR 

ienable"?*^!?"' 
(return fkom interrupt 
(disable carity 
(check foh good abort 
(aborted incorrectly 
(initialise the stack back 
(to 1100 ror we don't need it 
(to be in parity memory area 

(ANYMORE 

I***************************************************************** 

(TEST 46 TEST COATA) SM6,DM0 ADO INSTRUCTION 

I 

TST46I SCOPE 

( 11/45 **•• ROM STATE 142 •••• 

I 
( 



Hit 



Hd! 



HLT 
BR 
BIC 
MOV 

BIS 
RTI 
BIC 
JSR 
HLT 
MOV 



*1 

. + 36 

•BIT21BITI0,»PARITY 
CSPJ*,-CS>'3 

#bIT0,#PAHITY 

#BIT0,»PAHITY 
R0,*«CHECI<LOC 
♦ i 

»STACK,SP 



11/40 **** ROM STATE 250 **** 



JSR 

L 

HOV 
MOV 
MOV 



ADD 
BIC 

HLT 



R0, IfiSJ 

*R1,R0 

R0, CR0)* 

#.«12.l>«Sl>D0AT 



-2CK0] ,R0 
«BIT2,#PAKITY 
♦ 1 



(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A OATO 
(DO THE 0»T0 

(STORE THt PC THAT SHOULD 
(BE PUSHEU ON THE STACK 
(IF A PARITY ABORT OCCURS 
(00 A DAT! 

(WRITE NOKMAL FOR EHT CALL 
(DIDN'T ABORT 
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2041 


007316 


0100410 




2042 


007320 


0''2777 


0R0005 


2043 


007326 


004037 


011550 


2044 


007332 


1104003 




2045 


007334 


012706 


001100 


2046 








2047 








2046 








2049 


007340 


000004 












2051 








2052 








2053 


007342 


0104015 




2054 


007344 


0107374 




2055 


007346 


011100 




2056 


007350 


010010 




2057 


007352 


012737 


007362 


2056 








2059 








2060 


007360 


1<O5710 




2061 


007362 


0*2777 


000004 


2062 


B07370 


1U4001 




2063 


007372 


0100410 




2064 


007374 


042777 


000005 


2065 


007402 


0104037 


011550 


2066 


007406 


1104003 




2067 


007410 


012706 


001100 


2368 








2069 








2070 








2071 


007414 


0100004 




2072 








2073 








2074 








2075 


007416 


004015 




2076 


007420 


0B7450 




2077 


007422 


011100 




2078 


007424 


010010 




2079 


007426 


012737 


007436 


2060 








2061 








2082 


007434 


105030 




2083 


007436 


042777 


000004 


2064 


007444 


104001 




2085 


007446 


000410 




2086 


007450 


042777 


000005 


2087 


007456 


0104037 


011550 


^086 


007461! 


lis ((003 




2089 


007464 


012706 


001100 


2090 








2091 








25192 








2093 


007470 


000004 




2094 









BR .'»22 
L= BIC •8IT21BITtt, •PARITY 

JSR R0,*#CHECKLOC 

HLT +3 

MOV iSTACK.SP 
(*******<>*i>**i>|k**i<ir*i>K«*a*««i>«««ii>n(«*l>*« ««*■(■> 
(lEST 47 TEST DHl TSTB INSTRUCTION 

(•*••••*•••*•*••******•*«•*•****• 
TST47I SCOPE 



(60 TO NE»T TEST 
(WRITE NOMMAL AND DISABLE 
(CHECK FON 6000 ABORT 
(ABORTED iNCORRECTLY 
(RESET THt STACK 



11/40 KOM STATE 267 *«•• 



JSR 



R0, (R5] 



(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A DATO 
(DO THE OATO 

(STORE THt PC THAT SHOULD 
(BE PUSHEU ON THE STACK 
(IF A PARITY ABORT OCCURS 
(DO A OATl, DATIP 
(WRITE NO«MAL FOR EMT CALL 
(DIDN'T ABORT 
(GO TO NEXT TEST 
(WRITE NOHMAL AND DISABLE 
(CHECK FQM GOOD ABORT 
(ABORTED INCORRECTLY 
(RESET THt STACK 

TEST 0M3 CLRB INSTRUCTION 
(*****4i***it********ai******************«i*i 

Ti>T50: SCOPE 

( 11/45 **** ROM STATE 221 *••• 

( 



MS 



MOV 
MOV 
MOV 



TSTB 

BIC 

HLT 

BR 

BIC 

JSR 

HLT 

MOV 



I>R1«R0 
R0, (R0) 

«.*10,»#$I»DDAT 



(H0) 

#BIT2,#PANITY 
♦1 

.+22 

«BIT2tBITB,#PARITV 

R0,#«CHECKLOC 

♦ 3 

•STACKrSP 



( lEST 50 



11/40 *••• ROM STATE 264 *«** 



MOV 
MOV 
MOV 



CLRB 

BIC 

HLT 

BR 

BIC 

JSR 

HlT 

MOV 



•RlfR0 
Re, (R0) 

• .')'10iflllSI>ODAT 



#(R0)* 

#BIT2,#PAWITY 
* i 

.+22 

•eiT21BITB,#PARITY 
R0,*«CHECKLOC 




(SET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
(SET UP FUR A OATO 
(DO THE OATO 

(STORE THt PC THAT SHOULD 
(BE PUSHEU ON THE STACK 
(IF A PARITY ABORT OCCURS 
(00 A OATi 

(WRITE NORMAL FOR EMT CALL 
(DIDN'T ABORT 
(GO TO NEXT TEST 
(WRITE NOHMAL AND DISABLE 
(CHECK FOW GOOD ABORT 
(ABQHttD iNCORRECTLV 
(RESET THt STACK 
•*****•*(**********•••******•*****•*•* 
SUBTRACT INSTRUCTION 



11/45 *•*• ROM STATE 27 •**» 
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3095 
£096 
2097 
2998 
2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2113 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2123 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 
2135 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2145 
2146 
2147 
2148 



007472 
007474 
007476 
007500 
007502 



007510 
007514 
007522 
007524 
007526 
007534 
007540 
007542 



007550 
007552 
007554 
007556 
007560 



007566 
007572 
007600 
007602 
007604 
007612 
007616 
00762Z 



007624 
007626 



004015 
0<«75a6 
011100 
010010 
012737 



1^1027 
042777 
liS400l 
0III0410 
042777 
eld4037 
104003 
012706 



11/40 *•** ROM STATE 250 ***• 



007546 0i)00e4 



0W4015 
01117604 
011100 
010010 
012737 



1*5060 
0'*2777 
1104001 
000410 
0*2777 
0U4037 
1*14003 
012706 



000004 
022701 



007632 101005 
007634 0<£2777 



007512 001332 



177777 

000004 172100 



000005 172066 P: 
011550 



JSR 
P 

MOV 
MOV 
MOV 



SUB 

b:c 

HLT 

SR 

BIC 

JSR 

HLT 

MOV 



Ra, CR5] 

*RliR0 

Re, (R0) 

f.+ie^fmsbODAT 



(RB) ,#177?77 

#8IT2,»PAKITY 

♦1 

.+22 

*BIT21BIT»,»PARITY 

R0,*«CHECKLOC 

♦ 3 

•STACK, SP 



JSET UP PARITY VECTOR SERVICE 
^ROUTINE ADDRESS 
ISET UP FUR A DATO 
;00 THE DATO 

ISTORE THt PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
IIF A PARiTY ABORT OCCURS 
»D0 A DATi 

IWRITE NORMAL FOR EMT CALL 

lOIDN'T ABORT 

IGO TO NE«T TEST 

IWRITE NOKMAL AND DISABLE 

rCHECK FOK GOOD ABORT 

JABORTEO iNCORRECTLV 

IRESET THt STACK 



007570 001332 




000002 
000004 



000005 
011550 



172022 
172010 R! 



BISB 

BIC 

HLT 

BR 

BIC 

JSP 

HLT 

MOV 



#R1,R0 

R0, IR0) 

*.*10,f«$i>DDAT 



•-(R0J ,2CK03 
#BIT2,#PAKITY 
♦ 1 

#BIT2IBITI1I,»PARITY 

R0,##CHEC^LOC 

+3 

#STACK,SP 



ISET UP PARITY VECTOR SERVICE 
IROUTINE ADDRESS 
ISET UP FUR A DATO 
100 THE DATO 

ISTORE THt PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
IIF A PARiTY ABORT OCCURS 
100 A DATi 

IWRITE NOKMAL FOR EMT CALL 

IDION'T ABORT 

IGO TO NE«T TEST 

IWRITE NOKMAL AND DISABLE 

ICHECK FOK GOOD ABORT 

lABORTED INCORRECTLY 

IRESET THt STACK 



IIEST 53 



NEXT 4 TESTS ARE NON-INTERLEAVE 4^ DEPENDENT 



SCOPE 
CMP 



000140 171554 



*17360,R1 



*140,*SSE]AD 



IHAVE WE ^'ARITY IN THE LOWER 4Kt 
lAND IS THE SELECTED REGISTER 
IGOVEHNIN>» THE 4K AREA? 
ITHIS COM^'ARE IS IF THE KTH 
IISN'T ENABLED DURING PROGRAM 
/EXECUTION 

lYES - PRUCEEO TO NEXT TESTS 
IWHICH OE^'ENO ON PARITY IN LOWER 
I THE ABOVt COMPARE DIDN'T 
ICHECK - - DO THIS COMPARE TO 
ISEE IF ir WAS BECAUSE THE 
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2149 
2150 
2151 
2152 
2153 
2154 
2155 
2156 
2157 
2158 
2159 
2160 
2161 
2162 
2163 
2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 



2197 
2198 
2199 
2200 
2201 
2202 



007642 0191401 
007644 eiil0a04 



007646 0<i2777 000001 171572 2»l 



007654 001405 

007656 062767 000004 171416 4»: 



007664 0100137 010426 
007670 0t)5237 001624 



BEQ 
ADD 



JMP 
INC 



#1,»NTERA0 



3S 

«4,STSTNM 



««Ri-D4'26 
»«PSPCORZUNES 



ITABLE WAS CREATED WITH MEMORY 
/MANAGEMENT TURNED ON 
IPROCEED 10 NEXT TESTS IF THIS 

icoMPARE Checks 

ITHE REGISTER UNDER TEST IS NOT 
ICONTROLLING THE LOWER 4K i I J 
IGO TO RE-EVALUATE STSTNM AND 
MUMP OVEK THE C4) 4K DEPENDENT 
ITESTS 

IIS THIS CONTROLLER 
IINTERLEAVED7? 
IBRANCH I^ NO 

ISET STSTNM TO PROPER VALUE 
ISINCE THt NEXT a TESTS WILL 
IBE SKIPPtO 

lJUMP TO 1ST INDEX WORD TEST 
ISET FLAG INDICATING TO 'CHECKLOC 
IROUTINE IHAT PS AND PC FETCH 
lAND RED >• YELLOW ZONE AREAS 
lABE GOINU TO BE TESTED 



********************************************************************** 
nt*********************************************** *•*•*••**•***•*•***•** 

THE CONTtNTS OF THE STACK FOR THt NEXT TEST ARE AS FOLLOKSl 

1ST PUSH - OLD PS FROM ERROR TRA** CN0RMAL3 
2ND PUSH - OLD PC FROM ERROR TRA^ CNORMALJ 

NOTE: THE TEST SHOULD FAIL ON AUEMPT TO FETCH THE NEW fs 

WHEN THE PARITY ERROR OCCURS THE STACK POINTER IS 
ALTERED FROM THE ORIGINAL ERROR TRAP, THUS GIVINGi 

1ST PUSH - OLD PS FROM ERROR TRAf (NORMAL) 
2ND PUSH - NEW PS FROM THE PARITY ERROR 

3RD PUSH - NEW PC FROM THE PARITY ERROR 

•A******************************************************************** 



********* a*************************************** *********** ********** 



007674 0il0004 



I (EST 54 TEST NEW 

l***************i 
TST54I SCOPE 



k********* 
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1 




11/45 •••* ROM STATE 


357 *•** 












1 








sees 










1 


n/40 


«••• ROM STATE 115 «*•» 






007676 


0ID4015 








JSR 


R0, (RS) 


(SET UP PARITY VECTOR SERVICE 


2207 


0B770CI 


0W7754 








T0 




(ROUTINE ADDRESS 


2208 


007702 


042777 


000004 


171712 




BIC 


#BIT2,»PAKITY 


IWRITE NO«MAU 


22199 


007719 


012737 


007750 


000010 




MOV 


#T,»#RESVtC 


IRESERVED INSTRUCTION TIMEOUT 


2210 
















IVECTOR AUDRE3S 


2211 


007716 


012737 


007750 


001332 




MQV 


«T,**SGOOAT 


ISTORE THt PC THAT SHOULD 


2212 
















}BE PUSHEU ON THE STACK 


2213 
















llf A PARITY ABORT OCCURS 


2214 


007724 


0=2777 


0001904 


171670 




BIS 


•8IT2,#PAi<ITY 


fWRITE OTHER PARITY 


2215 


007732 


012737 


000340 


000012 




MOV 


• j40,*«REi>VEC'»2 


INEW 'PS' FOR ERROR TRAP 


2216 


007740 


042777 


000004 


171654 




BIC 


•81T2,#PA»<ITY 


IWRITE NORMAL 


2217 


007746 


007000 








7000 




INON«RECO>iNIZABLE OP-CODE 


22ia 
















ISHOULD ATTEMPT TO TRAP TO 'Ts 


221<J 


007750 


H)4I301 






T? 


HUT 


+ 1 


IDION'T ABORT 


2223 


007752 


01^0406 








BR 


. + 16 


IGO TO RESET THE STACK 


2221 


007754 


042777 


000001 


171640 


TKSJ 


BIC 


#8IT0,#PAWITY 


IDISABLE fARITY 


2222 


007762 


004037 


011550 






JSR 


R0,#*CHECKLOC 


FCHECK FOK GOOD ABORT 


2223 


007766 


1KI4003 








HUT 


♦ 3 


(ABORTED J^NCDRRECTLY 


2224 


00777B 


012706 


001100 






MOV 


•STACK, SP 


IRESET THt STACK 


2225 


















2226 


















2227 



















( 
I 

(THE CONTfcNTS OF THE STACK FOR THt NEXT TEST ARE AS FOLLOWSS 

; 

;1ST PUSH . OLD PS FROM ERROR TRAf (NORMAL) 
;2ND PUSH - OLD PC FROM ERROR TRAK (NORMAL) 

; 

INOTE: the test SHOULD FAIL ON ATTEMPT TO FETCH THE NEW He 

; 

I WHEN THE PARITY ERROR OCCURS THE STACK POINTER IS 

I NUT ALTERED FROM THE ORIGINAL ERROR TRAP AND THE 

I Pt FOR THE PARITY ERROR I* THE OLD PS, THUS G1VINI>, 

f 

;IST PUSH - OLD PS FROM ERROR TRA^" (NORMAL) 

;2ND PUSH - OLD PS FROM ERROR TRA^* (NORMAL) 

; 

UN OTHER WORDS THE ORIGINAL ERRQH TRAP AND VECTOR IS LOSIJU 
I 

; 

f********************************************************************** 

;*****************«**************************************************** 
I********************************************************************** 

•*•***•**•••*••*•****•*•****••••** 



2255 
2256 
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225T 








22SB 








2259 








2260 


007774 


000004 




2261 








2262 








2263 








2264 


007776 


011)4015 




2265 


010000 


010056 




2266 




jlSTJT 


9* 9?52 


2267 








2266 


010010 


012737 


000340 


2269 


010016 


0*15737 


001642 


2270 


010022 


0li!l404 




2271 


010024 


012737 


010052 


2272 








2273 








2274 








2275 








2276 


010032 


000403 




2277 


010034 


012737 


000010 


2278 








2279 








2280 


010042 


042777 


000004 


2281 


010050 


007000 




2282 








2283 


010052 


11^4001 




2284 


010054 


000406 




2285 


010056 


042777 


000001 


2286 


010064 


004037 


011550 


2287 


010070 


1104003 




2288 


010072 


012706 


001100 


2289 








2290 








2291 









TEST NEW -PC* FETCH 



TST55: 
I 

} 
I 



11/45 **•• ROM STATE 355 **** 



11/40 
JSR 
V0 
Mny 

MOV 
TST 
BED 
MOV 



BR 
MOV 



BIC 
7000 

HLT 

BR 

BIC 

JSR 

HLT 

MOV 



<*•• ROM STATE 333 **•* 
R0, (RS) 



fSAKiPMRE^VEC+a 

*«CPU40 

IS 

• V,I>*SGDDAT 



2$ 

«10,P*SGDl'AT 



»8IT2, •PARITY 



♦ 1 

, + 16 

»8IT0,»PAHITY 
R0,##CHECKLOC 
+ 3 

•STACK, SP 



ISET UP PARITY VECTOR SERVICE 

(ROUTINE ADDRESS 

IRESERVED INSTRUCTION TIMEOUT 

(VECTOR AUDrEsS 

(NEW 'PS' FDR ERROR TRAP 

(ARE WE ON AN ll/40t 

(BRANCH ir NO 

(STORE THIS VALUE OF THE PC THAT 
(SHOULD Bt PUSHED ON THE STACK 
(IF A PARiTY ABORT OCCURS 
(SINCE THt PC IS UPDATED FIRST 
(THEN THE VECTOR DATA TAKEN 
(CONTINUE WITH TEST 
(STORE THt PC THAT SHOULD 
(BE PUSHEU ON THE STACK 
(IF A PARITY ABORT OCCURS 
(WRITE NQKMAL 
(NON-RECOI>NIZABLE DP-CODE 
(SHOULD ATTEMPT TO TRAP TO 'VC 
(DIDN'T ABORT 
(GO TO RESET THE STACK 
(DISABLE f*RlTY 
(CHECK FON GOOD ABORT 
(ABORTED INCORRECTLY 
(RESET THt STACK 



I******************************* ************* 
I*************************************************************** ******* 
} 
I 

(THE FOLLUWING test will/should cause a parity ABORT IN THE 
('YELLOW' ZONE. THE 'YELLOW ZONt is AN AREA UP TO A 16 WORD 
(LOCATION LIMIT BEYOND THE STACK OVERFLOW BOUNDARY OF 400 
((OCTAL). I.E. LOCATIONS 376 - 340 COMPRISE THE YELLOW ZONE. 
> 

(SINCE PA><ITY ERRORS HAVE HIGHEST PRIORITY WE WILL BE LOOKING 



jFQR THE Rarity abort tc 



;CUR BcruRE THE STAC 



(TRAP TO LOCATION 4, 
( 
( 

(THE CONTtNTS OF THE STACK AFTER EXECUTION OF tmS NtXT TEST 

(SHOULD Bfe A3 FOLLOWS* 

( 
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1ST PUSH . PS FROM THE PARITY ERKQR 

BND PUSH - PC FROM THE PARITY ERHOR 

3RD PUSH - PS FROM THE STACK VIOLATION 

4TH PUSH - PC FROM THE STACK VIOLATION 



NOTE! THE ABOVE CONTENTS WILL EXIST ON THE STACK IF BOTM 
TME PARITY ERROR AND THE STACK VIOLATION i^ERE 
RtCOGNIZED AND THE PARITY ERROR TOOK PRECEOENCEl 



A********************************************************************* 
******* **t*1i*li*t** ft************* ******** ***************************** 
********************************************************************** 



2325 






2326 






2327 






232B 






2329 






2330 


010076 


01^0004 


2331 






2332 






2333 






2334 


010100 


0U<(ai5 


2335 


010102 


010162 


2336 


010104 


0*5037 


2337 






2338 






2339 


010110 


0'*2777 


2340 


010116 


012706 


2341 




1 3727 


2342 






2343 


010126 


000000 


2344 






2345 


010130 


012737 


2346 






2347 






2348 


010136 


012737 


2349 


010144 


012737 


2350 






2351 






2352 


010152 


0^5766 


2353 






2354 






2355 






2356 






2357 


010156 


104010 


2358 






2359 


010160 


000421 


2360 






2361 


010162 


104011 


2362 






2363 


010164 


01^0417 


2364 







f************************************************* **************** 

JIEST 56 TEST ABORT IN 'YELLOW ZONE 

J************************* ******************************** ******** 

Ti>T56I SCOPE 

; 11/45 *•** ROM STATE 177 **** 



11/40 *•*» RDM STATE 267 



000004 
000376 
000004 



010166 000004 



JSR 

VI 

CLR 



BIC 
MOV 
MOV 



5AVL0C48 



000340 
010156 



177742 



000006 
001332 



MOV 
MOV 



R0, CR5) 



#8IT2,»PAKITY 
#376, SP 
*«a, CPCJ* 



*V2,*«ERRVEC 



«340,##ERHVEC*'2 
#.+12)*#$^D0AT 



-36CSP) 



YELLOW 



Vl: 



»SET UP PARITY VECTOR SERVICE 

^ROUTINE ADDRESS 

ICLEAR BOTTOM LIMIT LOCATION 

»0F »YELL"jw' ZONE USING 'OTHER' 

IPARITY 

IWRITE NOKMAL 

ISET STACK IN 'YELLOW' AREA 
>SAVE CONTENTS OF LOC. 4 IN 
JNEXT LOCATION 

»ORIGINAL CONTENTS OF LOC. 4 
>G0 HERE 

JSET UP A TIMEOUT VECTOR SERVICE 
^ROUTINE ADDRESS FOR STACK VIO- 
aATlON 

;NEW PS ON TIMEOUT TRAP 

ISTORE THt PC THAT SHOULD 

IBE PUSHEU ON THE STACK 

HF A PARITY ABORT OCCURS 

/REFERENCt BOTTOM LIMIT OF 

> 'YELLOW' ZONE USING REGISTER 6 

ITHIS INSTRUCTION SHOULD CAUSE 

IAN ABORT 1ST, THEN A STACK 

IVIOLATIQN 

»DIDN'T ABORT OR RECOGNIZE THE 

ISTACK VIOLATION 

»G0 TO RESET STACK AND RESTORE 

;TIME0UT VECTORS 

MBORTED BUT STACK VIOLATION 

>NOT RECOi»NIZED 

>G0 TO RESET STACK AND RESTORE 
ITIMEOUT VECTORS 
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2365 


010166 


042777 


000001 


171426 V<i! 


BIC 


«BIT0,#PAf ITY 


IDISABLE f-ARITY 


2366 


010174 


0145737 


000372 - 




TST 


#«372 


»STACK VIOLATION PICKED UP - 


2367 














»WAS THE fARITY ABORT? 


2368 


010200 


0idl002 






BNE 


IS 


;BRANCH If YES 


2369 


010202 


1B4012 






HLT 


+ 12 


ISTACK VIOLATION PICKED UP 


2373 














IBUT ABORT NOT RECOGNIZED 


2371 


010204 


000407 






BR 


YELLOW 


IGO TO RESET STACK AND RESTORE 


2372 














ITIMEOUT VECTORS 


2373 


010206 


012706 


001100 


1*1 


MOV 


#STACK,SP 


IRESET STACK BACK TO NORMAL 


2374 


010212 


013746 


000372 




MOV 


• *372,-tSt'J 


IPUSH ABO^T PC ONTO KERNAL 


2375 














ISTACK OUT OF VIOLATION AREAS 


2376 














IFOR CHECKING PURPOSES 


2377 


010216 


0B4037 


011550 




JSR 


R0,»«CHECKLOC 


1 CHECK FOK GOOD ABORT 


2378 


010222 


104003 






HLT 


♦ 3 


1 ABORTED INCORRECTLY 


2379 


010224 


012706 


001100 


YtLLOWS 


MOV 


•STACK, SP 


IRESET STACK BACK TO NORMAL 


2380 


010230 


013737 


010126 


000004 


MOV 


•«SAVL0C4f »#4 


IRESTORE CONTENTS OF LOC, 4 


2381 


010236 


005037 


000006 




CLR 


f*6 


IRESTORE CONTENTS OF LOC. 6 


2382 


010242 


005037 


000372 




CLR 


• #372 


IRESET TRAPCATCHER LOCATION 


2383 














IFOR NEXT TEST 


2384 


010246 


005037 


000340 




CLR 


»*340 


ICLEAR BOTTOM LIMIT LOCATION 


2385 














lOF 'YELLOW' ZONE USING NORMAL 


2386 














IPARITY 


2387 
















2388 
















2389 


















f******* *************** 








) ********************************************************************** 





f ********************************************************************** 
f ********************************************************************** 

t 
I 

ITHE FOLLOWING TEST WILL/SHOULD CAUSE A PARITY ABORT IN THE 
I'RED' ZONE. THE 'RED' ZONE IS T^E AREA BEYOND THE 'YELLOW' 
IZONE DESLRIBEO IN THE ABOVE TEST- I.E. LOCATIONS 336 ON 
lOOWN COMPRISE THE 'RED' ZONE 
t 

ISINCE PAHITY ERRORS HAVE HIGHEST PRIORITY WE WILL BE LOOKING 

IFOR THE Parity abort to occur BEfORE THE STACK VIOLATION 

ITRAP TO LOCATION 4. 

I 

I 

ITHE CONTtNTS OF THE STACK AFTER tXECUTION OF THE NEXT TEST 

ISHOULO Bt AS FOLLOWS! 

I 

ILOC, - PC FROM STACK VIOLATION 
ILOC. 2 - PS FROM STACK VIOLATION 
I 

INOTE: the PS AND PC FROM THE STACK VIOLATION ARE IN LOCS. ft2 
I BECAUSE THE STACK POINTER (R6) IS REPOSITIONED TO LOC. 4 

I (BY HARDWARE) 11 

t 
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2429 

2431 
2432 
2433 
2434 
2435 
2436 
2437 
a43« 
2439 
2440 
2441 
2442 
2«43 
2444 
2445 
2446 
2447 
2446 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
24Sa 
2459 
24619 
2461 
2462 
2463 
2464 
2465 
2466 
2467 
2466 
2469 



ILOC. 374 
HOC, 372 
I 

inote: 
I 
I 
1 
; 
I 

>•••*••*••**••••*****•*••••*• 



P8 FROM PARITY ABORT 
PC PROM PARITY ABORT 



TME ABOVE CONTENTS WILL E«1ST IN THE 2 DIFFERENT STACK 
A«EA8 IF BOTH THE PARITY tRRQR »ND STACK VIOLATION MERE 
RECOGNIZED. THE TEST BELUW WIUL DIFFERENTIATE BETWEEN 
WHICH OCCURRED FIRST. 



0113252 000004 

010254 0U40i5 

010256 010336 

010260 0^5037 000336 

010264 042777 000004 

010276 013727 000000 

010302 01^0000 

010304 012737 010342 



010312 012737 000340 
010320 012737 010332 



010332 11^4010 

010334 000421 

01B33& H»4Bil 

010340 01^0417 

010342 042777 000001 

010350 0»5737 000372 



>IEST 57 
T!>T57: SCOPE 



11/45 ••** ROM STATE 177 **** 



000006 
001332 



t 11/40 
JSR 
V3 
CLR 

BIC 

nOV 
MOV 

HULDL0C4I 

MOV 



MOV 
MOV 



**•» ROM STATE 267 •*•* 



«8IT2,»PAMITY 
*576|3r 
»«4, CPC]* 



171252 



HLT 

BR 

HUT 

BR 

BIC 
TST 



,MORO 
«V4,*«ERRVEC 



«34e,##ERHVEC'»2 
*. + 12f *«S)>DDAT 



+ 10 

RED 
+ 11 
RED 

»8IT0,»PA»<ITY 
##372 



;SET UP A PARITY VECTOR SERVICE 
fROUTINE ADDRESS 
tCLEAR isr LOCATION OF 'RED* 
IZONE USING 'OTHER' PARITY 
IWRITE NOHMAL 

J3ET STAC« IN 'YELLOW'AREA 
ISAVE CONIENTS OF LOC. 4 
UN NEXT LOCATION 
^ORIGINAL CONTENTS OF LOC. 4 
IGO HERE 

fSET UP A TIMEOUT VECTOR SERVICE 
rROUTINE *D0RE5S FOR STACK 
IVIOLATION 

INEW PS ON TIMEOUT TRAP 

ISTORE THt PC THAT SHOULD 

;BE PUSHEU on THE STACK 

IIF A PARITY ABORT OCCURS 

SRErERcNCt 137 LOCATION OF -RED" 

IZONE USING REGISTER 6 

fTHIS INSTRUCTION SHOULD CAUSE 

IAN ABORT ISTi THEN A STACK 

IVIOLATION 

IDION'T ABORT OR RECOGNIZE THE 

ISTACK VIOLATION 

IGO TO RESET STACK AND RESTORE 

ITIHEOUT VECTORS 

lABORTEO But ST*CK VIOLATION 

INOT RECOGNIZED 

IGO TO RESET STACK AND RESTORE 

ITIMEOUT VECTORS 

IDISABLE l-ARITY 

ISTACK VIOLATION PICKED UP • 
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2470 








2471 


010354 


01^1002 




2472 


010356 


li94012 




2473 








2474 


010360 


01^0407 




2475 








2476 


010362 


012706 


001100 


2477 


010366 


013746 


000372 


2478 








^ ft 








2480 


010372 


004037 


011550 


2481 


010376 


104003 




2482 


010400 


012706 


001100 


2483 


010404 


013737 


010302 


2484 


010412 


005037 


000006 


2485 


010416 


005037 


000372 


2486 








2487 


010422 


005037 


000336 


2488 








2489 








2490 








2491 








2492 


010426 


000004 




2493 








2494 








2495 








2496 


010430 


005037 


001624 


2497 








2498 


010434 


004015 




2499 


010436 


010514 




2500 


010440 


042777 


000004 


2501 


010446 


010100 




2502 


010450 


012720 


010070 


2503 








2504 








2505 


010454 


052777 


000004 


2506 


010462 


012720 


177776 


2507 








2508 


010466 


042777 


000004 


2509 


010474 


010037 


001332 


2510 








2511 








2512 


010500 


012710 


000203 


2513 








2514 








2515 


010504 


004360 


177774 


2516 


010510 


104001 




£5lT 


aiaSid 


000410 




2518 


010514 


042777 


000001 


2519 


010522 


004037 


011550 


2520 


010526 


104003 




252! 


010519 


0^3706 


9B!!0B 


2522 








2523 









BNE 
HLT 



MOV 
MOV 



JSR 
HLT 
MOV 
MOV 
CLR 
CLR 

CLR 



I I EST 60 



TST60I 
I 



IS 

+ 12 



#STACK,SP 
•#372, -CSf) 



R0,»iCHECKLOC 
♦ 3 

«STACK,SP 

#«HUL0L0C4,*«4 

#*6 

#•372 

##336 



TEST CINDtX WORD) 



IWAS THE HARITV ABO»T? 
IBRANCH ir YES 

ISTACK VIOLATION PICKED UP BUT 
lABORT NOT RECOGNIZED 
IGO TO RESET STACK AND RESTORE 
ITIMEOUT VECTORS 
IRESET STACK BACK TO NORMAL 
IPUSH ABOHT PC ONTO KERNAL 
ISTACK our OF VIOLATION AREAS 

ifoR cHtci*iNG Purposes 

ICHECK FOM GOOD ABORT 
(ABORTED iNCORRECTLY 
IRESET STACK BACK TO NORMAL 
IRESTORE l-ONTENTS OF LOC. 4 
IRESTORC LONTENTS OF LOC. 6 
IRESET TRAPCATCMER LOCATION 
IFOR NEXT TEST 

ICLEAR 1ST LOCATION OF 'REO' 
IZONE USING NORMAL PARITY 

SM0,OMT MOV INSTRUCTION 



11/45 ***• ROM STATE 7 •••• 



171140 



11/40 
CLR 



BIC 
MOV 
MOV 



BIS 
MOV 



BIC 
MOV 



JSR 

HLT 

BH 

BIC 

JSR 

HLT 

MOV 



*«•* ROM ST*TE 206 **•* 
#«PSPCORZUNES 



#8IT2,#PAMITY 
R1,R0 

«t0e7B, (RO)* 



*BIT2,#PAKITY 
•-2. CR0)+ 



«BIT2,#PAMITY 
R0,P#$GDDAT 



•203, CR0) 



R3,-4CR0) 
+ 1 

#BITB,»PAKITY 
RB,P«CHECi^LOC 
♦ 3 

•STACK, SP 
TEST CINOtX WORD} 



ICLEAR PS, PC OR ZONES 
lABORT FLAG 

ISET UP PARITY VECTOR SERVICE 
(ROUTINE ADDRESS 
IWRITE NQHMAL 
ISET UP FUR A DATQ 
IMOVE THE INSTRUCTION 
I'MOV R0,P-2tR0)' TO PARITY 
(MEMORY AKEA 
IWRITE OTfiER PARITY 
IWRITE THt INDEX WORD IN NEXT 
IPARITY MCMORY AREA LOCATION 
IWRITE NDKMAL 
(STORE THt PC THAT SHOULD 
(BE PUSHEO ON THE STACK 
IIF A PARiTY ABORT OCCURS 
IMOVE 'RTS R3' INTO NEXT 
(PARITY MtMORY AREA LOCATION 
UN CASE WE DON'T ABORT 
IGO TO PA«ITY MEMORY AREA 
(DIDN'T ABORT 
(GO TO NE»T TEST 
(DISABLE ►'ARITY 
(CHECK FQW GOOD ABORT 
(ABORTED INCORRECTLY 
(RESET THt STACK 

SM6,DMB CMP INSTRUCTION 



M»INDEC-ll-DCKBR-t 
DCKBRE.Pll 



MACYll aTt6573 2B-HAY-75 14:33 P*GE 52 
CPU PARITY TEST M*IN FLOW 



2524 










I***************************************************************** 


2S25 


010534 


0U 004 






T>>T61 1 


SCOPE 








2526 














11/45 **•* ROM 


STATE 


26 •*•* 


2527 










t 










2528 










1 


1 1/40 


**** ROM ST*TE 241 


**** 




2529 


010536 


0U4015 








JSR 


R0J CR5J 




ISET UP RARITY VECTOR SERVICE 


2530 


010540 


010616 








XX 






(ROUTINE AODRESS 


2531 


010542 


0'*2777 


000004 


171052 




BIC 


•SIT2i *P*t<ITY 




JWRITE NC^MAL 


2532 


010550 


010100 








MOV 


Rl >R0 




ISET UP FUR A DATO 


2533 


010552 


012720 


026000 






fiOV 


*26000> CRl"]* 




IMOVE THE INSTRUCTION 


2534 


















? 'CMP -2C**0)»R0' TO PARITY 


2535 


















IMEMORY A**EA 


2536 


010556 


0^2777 


000004 


171036 




BIS 


• BIT2»#PA''ITY 




IWRITE OT^^ER PARITY 


2537 


010564 


012720 


177776 






MOV 


*"2» CR0) + 




IWRITE TMt INDEX WORD IN NEXT 


253S 


















(PARITY MEMORY AREA LOCATION 


2539 


010570 


0**2777 


000004 


171 024 




BIC 


#BI T2» •PARITY 




IWRITE NORMAL 


2540 


010576 


010037 


001332 






MOV 


R0, ##SGDO*T 




1 STORE THt PC THAT SHOULD 


2541 


















IBE PUSHEU ON THE STACK 


2542 


















IIF A PARITY ABORT OCCURS 


2543 


10602 


012710 








MOV 


«203, (R0] 




IMOVE 'RT!> R3' INTO NEXT 


2544 


















IPARITY MtMORY AREA LOCATION 


2545 


















UN CASE WE DON'T ABORT 


2546 


010606 


01^4360 


177774 






JSR 


R3,-4CR0] 




ISO TO PARITY MEMORY AREA 




0106 1 2 


1164001 








HUT 


+ 1 




IDIDN'T ABORT 


2548 


010614 


01^04 10 








BR 


t«22 




IGO TO NE*T TEST 


2549 


106 1 6 


0427 77 


00000 1 


170776 




BIC 


«8IT0,#PAKITY 




(DISABLE PARITY 


2550 


010624 


0W4037 


011 550 






JSR 


R0,«»CHECKLOC 




ICHECK FOK GOOD ABORT 


2551 


010630 


1^4003 








HUT 


♦ 3 




(ABORTED INCORRECTLY 


2552 




127 06 


ma 1 1 act 






MOV 


*STACK>SP 




IRESET THt STACK 


2553 










1 ***** 


*******************************«**************************** 


2554 










;IEST 


62 


TEST tINOtX WORD) 


SM0 


,DM6 MOV INSTRUCTION 


2555 










I******************* ******************' 


**************************** 


2556 


010636 


0U0004 






T!>T62: 


SCOPE 








2557 










» 




11/45 *•** ROM 


STATE 


6 •*•* 


2558 










f 










2559 










; 


11/40 


»*** ROM STATE 206 


**** 




2560 


10640 


0«40 1 5 








JSR 


R0, (R5} 




ISET UP PARITY VECTOR SERVICE 


256 1 


010642 


1 0720 








Y 






(ROUTINE ADDRESS 


2562 


010644 


042777 


000004 


1 70750 




BIC 


*BIT2,#PAKITY 




(WRITE NORMAL 


2563 


010652 


010100 








MOV 


R1,R0 




(SET UP FUR A DATO 


2564 


010654 


012720 


010060 






MOV 


#10060, tW* 




(MOVE THE INSTRUCTION 


2565 


















(•MOV R0,-2tR03' TO PARITY 


2566 


















IMEMORY AXEA 


2567 


010660 


032777 








BIS 


#BIT2,»P*KITY 




IWRITE OTHER PARITY 


2568 


010666 


012720 


1 77776 






MOV 


«-2> CR0)« 




IWRITE THt INDEX WORD IN NEXT 


2569 


















(PARITY MtMORY AREA LOCATION 


2570 


010672 


042777 


000004 


170722 




BIC 


#BIT2,#PA«ITY 




(WRITE NOKMAL 


2571 


010700 


010037 


001332 






MOV 


R0,##SGDOAT 




(STORE THfc PC THAT SHOULD 


2572 


















(BE PUSHEU ON THE STACK 


2573 


















(IF A PARITY ABORT OCCURS 


2574 


010704 


012710 


000203 






MOV 


«203i CR0] 




(MOVE «RTa RS' INTO NEXT 


2575 


















IPARITY MtMORY AREA LOCATION 


2576 


















(IN CASE WE DON'T ABORT 


2577 


010713 


004360 


177774 






JSR 


R3,-4tR0) 




(GO TO PARITY MEMORY AREA 



MAINDEC-ll-OCKBR- 
DCKBRE.PU 



MACYll 27(657) 2ia-MAY-75 14:33 
CPU PARITY TEST M*IN FLOW 



2578 


013714 


1164001 








HLT 


+ 1 


(DIDN'T ABORT 


2579 


010716 


000410 








BR 


. + 22 


IGO TO NEXT TEST 


2580 


010720 


042777 


000001 


170674 




BIC 


#81T0,#PAKITY 


lOISABLE KARITY 


2581 


010726 


0194037 


011550 






JSR 


Ra,##CHECRLOC 


ICHECK FOK GOOD ABORT 


2582 


010732 


104003 








HLT 


♦ 3 


lABORTED iNCORRECTLY 


2583 


010734 


012706 


001100 






MOV 


«STACK,SP 


IRESET THt STACK 


2584 










f***************************************************************** 


2585 










( (EST 


63 


TEST BPL INSTRUCTION 


C-BCOK) 


2586 










I ***** 


******** 


**************************************************** 


2587 


010740 


000004 






TST63: 


SCOPE 






2588 










( 




11/45 **** ROM STATE 


321 **** 


2589 










( 








2590 










( 


11/40 


•*•* ROM STATE 1 **** 




2591 


010742 


0194015 








JSR 


R0, CR5) 


ISET UP PARITY VECTOR SERVICE 


2592 


010744 


0U0S6 








20 




(ROUTINE ADDRESS 


2593 


010746 


042777 


000004 


170646 




BIC 


#8IT2.#PAt<ITY 


(WRITE NOKMAL 


2594 


010754 


010102 








MOV 


R1,R2 


ISET UP FUR A DATO 


2595 


010756 


162702 


000004 






SUB 


«4,R2 


(CALCULATt THE START 


2596 
















lAODRESS fOR THIS TEST 


2597 


010762 


012722 


012700 






MOV 


#12700, CR"*)* 


IMOVE THE INSTRUCTION 


2598 
















I'MOV #-l,R0« TO PARITY 


2599 
















IMEMORY AKEA 


2600 


010766 


012722 


177777 






MOV 


#-l# tR2)* 


IMOVE A -» INTO NEXT 


2601 
















IPARITY MtMORY AREA LOCATION 


2602 


010772 


012722 


100001 






MOV 


#100001, CK2)+ 


IMOVE the" INSTRUCTION 


2603 
















I'BPL .+4' INTO NEXT PARITY 


2604 
















(MEMORY AKEA LOCATION 


2605 


010776 


0^2777 


000004 


170616 




BIS 


•BIT2,#PAKITY 


IWRITE OTHER PARITY 


2606 


011004 


005737 


001642 






TST 


««CPU40 


(ARE WE ON AN 11/407 


2607 


011R10 


0191405 








BED 


2S 


(BRANCH II- NO 


2608 
















(SINCE THt PC WILL BE UPDATED 


2609 
















(ON THE PARITY ABORT 


2610 


011012 


010237 


001332 






MOV 


R2,#*SGD0AT 


(STORE THiS PC THAT SHOULD 


2611 
















(BE PUSHEU ON THE STACK 


2612 
















IIF A PARiTY ABORT OCCURS 


2613 
















(SINCE THt PC IS NOT UPDATED 


2614 
















(ON THE PARITY ABORT 


2615 


011016 


012722 


000240 






MOV 


#240,CR2)+ 


(MOVE A 'NOP' INTO NEXT 


2616 
















IPARITY MtMORY AREA LOCATION 


2617 


011022 


0t90404 








BR 


IS 


(CONTINUE WITH TEST 


2618 


011024 


012722 


000240 




2»: 


MOV 


#240, CR2)* 


IMOVE A 'NOP* INTO NEXT 


2619 
















IPARITY MtMORY AREA LOCATION 


2620 


011030 


010237 


001332 






MOV 


R2,##$GDDAT 


ISTORE THt PC THAT SHOULD 


2621 
















(BE PUSHEU ON THE STACK 


2622 
















(IF A PARITY ABORT OCCURS 


2623 


011034 


042777 


000004 


170560 


1»: 


BIC 


iBlT2,#PAKlTY 


IWRITE NORMAL 


2624 


011042 


012712 


000203 






MOV 


•203, CR2] 


IMOVE 'RT* R3' INTO NEXT 


2625 
















IPARITY MtMORY AREA LOCATION 


2626 
















UN CASE WE DON'T ABORT 


2627 


011046 


Bi«4362 


177770 






JSR 


R3,-10CR2J 


IGO TO PAKITY MEMORY AREA 


2628 


011052 


104001 








HLT 


+ 1 


(DIDN'T ABORT 


2629 


011054 


0U0410 








BR 


.+22 


IGO TO NEXT TEST 


2630 


011056 


042777 


000001 


170536 


ZI6: 


BIC 


»BIT0,#PAWITY 


(DISABLE PARITY 


2631 


011064 


0U403T 


011550 






JSR 


R0,#«CHECKLQC 


(CHECK FOK GOOD ABORT 



MAINDEC-lt.OCKBR't 
DCKBRE.PU 



M*CV11 27(657) 2ifl-M*Y-75 iat33 P«G£ 5« 
CPU PARITY TEST M*IN FLOW 



2632 


ei ie7e 


tiil4003 




2633 


011072 


0^2706 


001 100 


2631 








2635 








2636 








2637 


Blli176 


000004 




2638 








2634 








2640 








2641 


Q 1 1 1 S0 


0^4015 




2642 


01 1 102 


011214 




2643 


01 1 104 


042777 


000004 


2644 


011112 


010102 




2645 


011114 


l'>2782 


000004 


2646 








2647 


01 1 120 


012722 


012700 


2646 








2644 








2650 


011124 


012722 


000000 


2651 








2652 


01113? 


012722 


001001 


2653 








2654 








2655 


011134 


05'2777 


000004 


2656 


011142 


0115737 


001642 


2657 


01 1 146 


001tt05 




2656 








2660 


011150 


010237 


001332 


2661 








2662 








2663 








2664 








2665 


011154 


012722 


000240 


2666 








2667 


011160 


0U0404 




2668 


011162 


012722 


000240 


2669 








2670 


011166 


010237 


001332 


2671 








2672 








2673 


011172 


042777 


000004 


2674 


011200 


012712 


000203 


2675 








2676 








2677 


011204 


004362 


177770 


2678 


011210 


1*^4001 




2679 


011212 


000410 




2660 


011214 


042777 


000001 


2661 


011222 


004037 


011550 


2662 


011226 


IW4003 




2663 


011230 


012706 


001100 


2664 








2665 









HLT +3 MBORTED iNCORRECTUY 

MOV *STACK,SP PRESET THt STACK 

I *•**•***•***«*»««** •««•*•**•*•*•*•*••***•••••*••*•*•****•*•****** 

liEST 64 TEST BNt INSTRUCTION C-BCOK) 



TST64« SCOPE 

I 

} 

t 11/40 
JSR 
Zl 
BIC 
MOV 
SUB 

MOV 

MOV 
MOV 



SIS 
TST 
BEQ 



11/45 «*** ROM STATE 322 •••« 



170422 l»l 



BR 

MOV 



BIC 
MOV 



JSR 
HLT 
BR 

eic 

JSR 
HLT 
MOV 



**•* ROM ST»TE 1 »*•• 

R0, iR5] 

#8IT2,»PAKITY 

R1,R2 

«4>R2 

#0, (R2)+ 
#1001, CR2J + 



»BIT2,#PAKITY 

*«CPU40 

2S 



R2f PUSGOOAT 



«240, CR2]'» 



IS 

• itli, CR2)* 



Rei»«SGDD*T 



•B1T2,»PAKITY 

#203, (R2] 



R3.-10tR2J 
+ 1 

«BIT0,»PAKiTY 
R0,##CHEC^LOC 
♦ 3 

•STACK, SP 



fSET UP P*RiTY VECTOR SERVICE 

^ROUTINE ADDRESS 

IWRITE NQKMAL 

>SET UP FOR A OATO 

ICALCULATt THE START ADDRESS 

»FOR THIS TEST 

IMOVE THE INSTRUCTION 

I 'MOV #O»R0' INTO PARITY 

(MEMORY AKEA 

IMOVE A INTO NEXT PARITY 
IMEMORY AMEA LOCATION 
JMOVE THE INSTRUCTION 
>»BNE .t4'' INTO NEXT 
•PARITY MEMORY AREA LOCATION 
;WRITE OTHER PARITY 
I ARE WE ON AN 11/40? 
IBRANCH If NO 

ISINCE THt PC WILL BE UPDATED 
fON THE pSRITY ABORT 
ISTORE THIS PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
I IF A PARITY ABORT OCCURS 
»SINCE THt PC WILL NOT BE 
(UPDATED iJN THE PARITY ABORT 
IMOVE A 'NOP' INTO NEXT 
IPARITY MtMORY AREA LOCATION 
ICONTINUE WITH TEST 
IMOVE A 'NOP* INTO NEXT 
IPARITY MtMORY AREA LOCATION 
ISTORE THt PC THAT SHOULD 

tlF A PARITY 'abort OCCURS 
IWRITE NOMMAL 
IMOVE 'RT!> R3' INTO NEXT 
IPARITY MtMORY AREA LOCATION 
UN CASE WE DON'T ABORT 
IGO TO PAWITY MEMORY AREA 
lOIDN'T ABORT 
IGO TO NEXT TEST 
IDISA8LE fARITY 
ICHECK FOM GOOD ABORT 
(ABORTED INCORRECTLY 
IRESET THt STACK 



(TEST 65 



TEST SEW INSTRUCTION C-8C0K) 



MAINDEC-ll-DCKBR- 
DCKBRE, PU 



MACYll 27(6573 2liS-MAY-75 14S33 PAGE 55 
CPU PARITY TEST MAIN FLOW 



2686 






2667 


011234 


011)0004 


2666 






2689 






2690 






2691 


011236 


0D4015 


2692 


01 1240 


011352 


2693 


011242 


042777 


2694 


011250 


010102 


^695 


m t 




2696 






2697 


011256 


012722 


2696 






2699 






2700 


011262 


012722 


2701 






2702 


011266 


012722 


2703 






2704 






2705 


011272 


0^2777 


2706 


011300 


0*'5737 


2707 


011304 


01^1405 


2706 






2709 






2710 


011306 


010237 


2711 






2712 






2713 






2714 






2715 


011312 


012722 


2716 






2717 


011316 


000404 


2716 


011320 


012722 


2719 






2720 


011324 


010237 


2721 






2722 






2723 


01133W 


042777 


2724 


011336 


012712 


2725 






2726 






2727 


011342 


004362 


2726 


011346 


104001 


2729 


011350 


000410 


2730 


011352 


042777 


2731 


011360 


004037 


2732 


011364 


104003 


£73j 


01 136b 


0l(!706 


2734 






2735 






2736 






2737 


0!!372 




2736 


011374 


04277? 


2739 







5>T65; SCOPE 



11/45 *•** ROM STATE 324 *•*» 



11/40 »••* ROM STATE 1 •**• 



000004 170352 



177777 
001401 



000004 
001642 



000001 170242 Z2! 



170220 



JSR 
Z2 
BIC 
MOV 



MOV 
MOV 



BIS 
TST 
BEQ 



BR 

MOV 



170264 Ik: BIC 
MOV 



JSR 

HLT 

BR 

BIC 

JSR 

HLT 

MOV 



R0, (R5) 



#8IT2, OPACITY 
R1,H2 



«12700, {R<!}t 

#-1, CR23* 
#1401, CR2J'» 



#BIT2,»PAKITY 

#«CPU40 

2S 



R2,#«SGO0AT 



«240, CR23+ 



IS 

*240, (R23* 



R2,#«SGD0AT 



#BIT2,»PAKITY 
«203, (R23 



R3,-10(R2J 

♦ 1 

.+22 

»BIT0,#PAMITY 
R0,##CHECKLOC 

♦ 3 

#STACK,3P 



ISET UP PARITY VECTOR SERVICE 

IROUTINE ADDRESS 

IWRITE NQHMAL 

ISET UP FUR A OATO 

»C«LCUL»Tt THE START «DOKEaS 

IFOR THIS TEST 

IMOVE THE INSTRUCTION 

I'MOV #-l>R0' TO PARITY MEMORY 

I AREA 

IMOVE A -1 INTO NEXT PARITY 
IMEMORY AHEA LOCATION 
IMOVE THE INSTRUCTION 
I'BEQ .♦4'' INTO NEXT PARITY 
IMEMORY AMEA LOCATION 
IWRITE OTHER PARITY 
lARE WE ON AN 11/40T 
IBRANCH I»- NO 

ISINCE THt PC WILL BE UPDATED 
ION THE PARITY ABORT 
ISTORE THA8 PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
IIF A PARITY ABORT OCCURS 
ISINCE THt PC WILL NOT BE 
(UPDATED UN THE PARITY ABORT 
IMOVE A 'NOP' INTO NEXT 
IPARITY MtMORY AREA LOCATION 
(CONTINUE WITH TEST 
(MOVE A 'NOP* INTO NEXT 
(PARITY MtftORY AREA LOCATION 
(STORE THt PC THAT SHOULD 
IBE PUSHEU ON THE STACK 
(IF A PARiTY ABORT OCCURS 
IWRITE NQMMAL 
IMOVE 'RT» R3' INTO NEXT 
IPARITY MtMORY AREA LOCATION 
IIN CASE WE DON'T ABORT 
IGO TO PAMITY MEMORY AREA 
lOION'T AbQRT 
(GO TO NEXT TEST 
(DISABLE MARITY 
(CHECK FOM GOOD ABQRT 

(ABORTED Incorrectly 

(RESET THt stack 



SCneg 
BIC 



#BIT151BIT21B1T0,#PAR1TY 



(UISABLE ALL PARITY 
lAND CLEAN ERROR BIT) 



M*INDEC-U-DCKBR-t 
DCKBRE.Pll 
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CPU PARITY TEST MAIN FLOH 



2740 


011402 


0135737 


001630 


2741 


011406 


031014 




2742 








2743 


011410 


062737 


000002 


2744 


011416 


062737 


000002 


2745 








2746 


011424 


062737 


000002 


2747 








2748 








2749 


011432 


062737 


000002 


275B 








2751 


011440 


0144337 


011474 


2752 


011444 


01^0167 


000320 


2753 








2754 








2755 








2756 








2757 








2758 








2759 








2760 








2761 








2762 


0114S0 


012077 


170144 


2763 


01 1454 


0^2777 


000005 


2764 


011462 


0lfl0200 




2765 








2766 








2767 








2768 








2769 








277B 


01 1464 


0lil4337 


01 1506 


2771 


01 1470 


0'Sa 1 67 


000274 


2772 








2773 








2774 








2775 








2776 








2777 








2778 


01 1474 


0"5037 


001624 


2779 








2780 


01 1500 


0«55037 


001626 


2781 








2782 


011504 


0100203 




2783 
















2785 








2786 








2787 








2788 








2789 


011506 


0B5037 


001624 


2790 








2791 


011512 


0615037 


001626 


2792 








2793 


011516 


012737 


001340 



TST 
BNE 



ADD 
ADO 



ADD 
ADD 



JSR 
JMP 



»»USERTYPt 
IS 



«2,(>*SREGAD 
#2,I'#$TMP*0 



«2,*«SSETA0 
#2,##NTER*D 



R3,##FLAGSCLR 
SEOP 



IDID THE USER SELECT THE REGISTER'' 

IBRANCH it SO ANO DON'T STEP 

lUP THE TABLE 

rSTEP UP TO NEXT REGISTER 

(STEP UP TO CORRESPONDING 

IPARITY MtHORY 

ISTEP UP 10 NEXT OFFSET - THIS 

riS ONLY APPLICABLE IF MEMORY 

IMGMT IS lURNEO ON 

ISTEP UP TO NEXT INTERLEAVE 

LVALUE 

jclear pertinent flags 
;go to ring-a-ding 

;BEF0RE RtlTERATING THE PROGRAM 



I*********************************************************************** 
> 

jKOUTINE FOR SETTING UP THE PARITY VECTOR SERVICE ADDRESS 
f 

VtCSET! MOV CR0)+,»INTVEC ;WRITE AOORESS INTO LOCATION 114 

BIS #aiT2JBITW, •PARITY IWRITE OTHER PARITY ANO DISABLE 

RTS R0 JRETURN TU TESTING 

I ****************************************************************** 

f 

JHOUTINE TO RESET AND GO "ACK TD TABLE BEGINNING 
I 

RtSTARTt JSR #iINITIALIZE 

JMP SEOP IGO TO RING-A-DING 

J******************************************************************** 

I 

JHOUTINE TO CLEAR PERTINENT FLAGS BEFORE PASSING THRU THE PROGRAM 

l»iITH ANOTHER TABLE ENTRY 

I 

f*********************************************** ********************** 

FLAGSCLRi CLR #*PSPCORZONES >l^LEAR PS, PC AND ZONES A^ORT 

JFLAG 

CLR »«MSREGFLAG ICLEAR MSll REGISTER PRESENCE 

>FLAG 

RTS R3 IRETURN 

>' 

fKOUTINE TO COMPLETELY REINITIALIZE BEFORE RESTARUNG PROGRAM OVER 

;AT THE BEGINNING OF THE 

t 

INITIALIZE! CLR •»PSPCORZONES »l-|.EAR PS, PC ANO ZONES 

MBORT FL*G 



CLR 
MOV 



**msregflag 
«sreg0,##»regad 



ICLEAR MSH REGISTER PRESENCE 
IFLAG 

IMOVE FIRST REGISTER CONTAINER 
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2794 
2795 
2796 
2797 
2798 
2T99 
2800 
2801 
2802 
2803 
2804 
2805 
2806 
2807 
2808 
2809 
2810 
2811 
2812 
2813 
2814 
2815 
2816 
2817 
2818 
2819 
2820 
2821 
2822 
2823 
2824 
2825 
2826 
2827 
2828 
2829 
2830 
2831 
2S32 
2833 
2834 
2835 
2836 
2837 
2S38 
2839 
2840 
2841 
2842 
2843 
2844 
2845 
2846 
2847 



011524 012737 001366 001414 



011532 012737 001420 001416 



011540 012737 



011546 06)0203 



011550 
0U552 
011554 
011556 
011560 



011562 

011566 

011570 

011574 
011576 



011602 
011606 
011610 



010246 
010346 
010446 
005002 
06)5004 



0B5737 

0f 1027 

0615737 

001402 
0105002 



011600 0100414 



0615737 
16)0003 
017702 



91450 001446 



001624 



002304 
167602 



MOV »STMP0,##»TMPAD 



MOV #SStT0,##»SETAD 



MOV #NTER0,##NTERAO 



RTS R3 



UNTO SREi'AO WHICH IS USED TO 
IPOINT TO THE PARITY REGISTER 
/TABLE 

IMOVE FIRST MEMORY CONTAINER 
UNTO $TM»'AO WHICH IS USED TO 
IPOINT TO THE MEMORY LOCATION 
ITABLE 

IMOVE FIRST OFFSET CONTAINER 
UNTO $SE"AD WHICH IS USED TO 
IPOINT TO THE OFFSET LOCATION 
ITABLE IF MEMORY MGMT IS USED 
IMOVE 1ST INTERLEAVE CONTAINER 
UNTO 'IN1ERAD' WHICH IS USED 
ITO POINT"tO THE INTERLEAVE 
ILOCATION TABLE 
/RETURN 



I «**«*»«*****••*•»«*****«*•******« 
I 

ISUBHOUTINE TO CHECK THAT IF A TEST HAS ABORTED IT DID INDEED 
lABORT IN THE PROPER PLACt. IT IS QUITE CONCEIVABLE THAT A TEST 
I THAT SHOULD HAVE ABORTED IN THE TWO LOCATION MAP AREA ABORTED 
lilN THE FETCH OF THE INSTHUCTION THAT WAS TO CAUSt THE ABORT, 
I THIS SUBROUTINE WILL FLAl» SUCH OCCURRENCES. WITHOUT THIS CHECK 
I The program WOULD APPEAR TO HAVE RUN PROPERLY. 

r 

|BOTH THE CORRECT HIGH ORUER ERROR ADDRESS BITS AND PROPER PC 
it'USH ON THE STACK ARE LOUKED FOR AFTER A PARITY ABORT OCCURS, 
I 

I*********************** a*********************** ************************ 



CHECKLOC! 



MOV 
MOV 
CLR 
CLR 



MOV R<i,- 

R3,-CSPJ 

R4,-CSP3 

R2 

R4 



*«MSREGFL*G 



••PSPCORZUNES 



(SPJ 



BEQ 
CLR 



TST 
BPL 
MOV 



»»SKT11 
8S 

#SSETAD,R<: 



ISAVE R2 liONTENTS ON STACK 
ISAVE R3 i^ONTENTS ON STACK 

ISAVE R4 Contents on stack 

ICLEAR ERMOR ADDRESS BIT COMPARE 
/REGISTERS IN CASE WE HAVE AN OLD 
IMOS DESIGN THAT DOESN'T HAVE 
/ADDRESS BITS 

IIS AN MFU OP MSll PARITY 

lOPTION BtING TESTEDt 

/BRANCH I^ MSll ANO DON'T 00 

/ADDRESS »ITS CHECKING 

/ARE WE DUING A PS OR PC FETCH 

/OR ZONE ABORT TEST? 

/BRANCH ir NO 

/SET THE Parity register high 

I ORDER ADURESS BITS VALUE 
KBITS 5 iHRU 113 TO ZERO FOR 
/THE PS oS PC FETCH ABORT TESTS 
ISO CHECK IT AGAINST ACTUAL 
/PARITY RtGISTER VALUE 
/MEMORY MANAGEMENT ONT 
/BRANCH NO 

/PICK UP THE OFFSET VALUE « IT 
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2S4e 


















ISHOUUO Bfc THE VALUE THAT WILL 


2849 


















lAPPEAR IN THE PAWTV HESI8TER 


2650 


















(ERROR AQURESa BITS 


2851 


011614 


01^0406 








BR 


28 




taO TO CHtCKt 


2852 


011616 


012703 


017400 




661 


MOV 


«17400,R3 




>GET A FINST POSSIBLE ABORT 


2853 


















fLOCATION AREA 


2854 


011622 


012702 


000140 






MOV 


«t4e,R2 




IGET THE flRST POSSIBLE PARITY 


2655 


















>RE6ISTER HIGH ORDER ADDRESS 


2856 


















IBIT8 VALUE (BITS 5 THRU 11) 


2857 


011626 


0<:0ia3 






1*; 


CMP 


Rl,M3 




MS THIS IHE ABORT AREA BEING 


2856 


















lUSEDT 


2859 


011630 


11^1027 








BHI 


3S 




»N0 - SEE IF IT'S THE NEXT ONE 


2860 


011633 


017704 


167764 




2»l 


MOV 


•PARITY, R4 




(PROCEED 10 SEE IF 


2661 


















;IT MAS A PROPER ABORT BY LOOKING 


2662 


















(AT THE HiGH ORDER ADDRESS BITS 


2863 


















>0F THE PARITY REGISTER 


2864 


















1 (BITS 5 IHRU 11) 


2865 


011636 


042704 


1700J7 






BIC 


#170037, R4 




ICLEAR AL^ BITS EXCEPT 5 THRU 11 


2866 


011642 


01^0402 








CMP 


R4,R2 




lARE THE tRROR ADDRESS BITS 


2867 


















IWHAT THEY SHOULD BET 


2868 


011644 


0101026 








BNE 


4]> 




IBRANCH V NO 


2869 


011646 


010237 


001326 




7»: 


MOV 


R2,i>«SG0AUR 




(STORE WHAT THE ADDRESS BITS 


2670 


















1 SHOULD HAVE BEEN 


2871 


011652 


010437 


001330 






MOV 


R4,»«SBDAUR 




(STORE WHAT THE ADDRESS BITS 


2872 


















(WERE 


2873 


011656 


012604 








MOV 


(aP)*,H4 




(RESTORE XA CONTENTS 


2874 


01166^ 


012603 








MOV 


CSP3*,R3 




(RESTORE K3 CONTENTS 


2875 


01 itbi 


0^2632 








MCV 






■pr«Tnpc Ha CONTENTS 


2676 
















2877 












WF HAVE 


REACHED THIS f'ATH 1 


OF 


2 CONDITIONS E»IST -- 


2878 












HAVE AN 


OLD M03 DESIGN WITH 


NO 


ADDRESS BITS, UR WE HAVE 


2879 










jtORE OR THE 


NEW MOS DESIGN WITH 


ADDRESS BITS OKU 


2880 




















2881 


011664 


026637 


000002 


001332 




CMP 


2(SP} ,»«SUODAT 




(WAS THE CORRECT PC PUSHED 


2882 


















(ON THE SIACKT 


2863 


011672 


0ID1404 








BEQ 


9S 




(BRANCH if YES 


2684 


011674 


016637 


000002 


001334 




MOV 


2CSP) .fVSBOOAT 




(SAVE INCURRECT PC FOR PRINTOUT 


2885 


011702 


0100200 








RTS 


R0 




(GO BACK 10 INDICATE BAD ABORT 


2686 


B117B4 


Bk)5720 






9»: 


TST 


CR0)* 




(STEP UP HETURN ADDRESS 


288T 


















iTn nvpisa TMF FDsnR ui_t 


2886 


011706 










RTS 


R0 




(RETURN TU CONTINUE TESTING 


2689 


011710 


062703 


004000 




3»: 


ADD 


«4000,R3 




(STEP UP 10 THE NEXT POSSIBLE 


2890 


















(ABORT LOCATION AREA 


2691 


011714 


0*12702 


000040 






ADD 


«40.R2 




(CHANGE THE VALUE OF THE HIGH 


2692 


















(ORDER ADURESS BITS VALUE TO BE 


2893 


















(CHECKED 


2894 


011720 


00074? 








BR 


IS 




(GO BACK 10 CHECK THIS ONE 


2895 


01 1722 


010237 


001326 




4»: 


MOV 


Ra,»«SCiDAUR 




(STORE WHAT THE ADDRESS BITS 


2896 


















(SHOULD HAVE BEEN 


2697 


0U726 


010437 


001330 






MOV 


R4,*#SBDAUR 




(STORE WHAT THE 


2898 


















(ADDRESS BITS WERE 


2899 


011732 


012604 








MOV 


CSP]4',R4 




(RESTORE H4 CONTENTS 


2900 


011734 


012603 








MOV 


CSP)t,R3 




(RESTORE K3 CONTENTS 


2901 


011736 


012602 








MOV 


(3P3*,R2 




(RESTORE H2 CONTENTS 
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2902 






2903 






290a 






2905 






2906 


01 1740 


0^6637 


2907 






2908 


011746 


0101404 


2909 


ail75Pl 


016637 


2910 


011756 


0^0200 


SQl < 


31 1762 


016737 


2912 






2913 


011766 


000200 


2914 







Hf WE HAVE REACHED THIS >'ATH WE HAVE CORE OR THE NEW MOS DESIGN 
(WITH BAD ADDRESS BITS WHiCH SHOULD INDICATE AN IMPROPER ABORTll 

000002 001332 CMP 2(SP) ,*«Sl>DOAT (WAS THE l-ORRECT PC PUSHED 

(ON THE SIACKT 
(BRANCH l^_ YES 

000002 001334 MOV 2CSP3 ,»#SBDOAT (SAVE INCURRECT PC FOR PRINTOUT 

(GO BACK 10 INDICATE BAD ABORT 



CMP 


2(SP) ,*«Sl>DOAT 


BEO 


10S 


MOV 


2(SP3 ,P«SBD0AT 


RTS 


R0 






WTS 


R»S 



(CORRECT fC WAS PUSHED ON STACK 
(GO BACK 10 INDICATE BAD ABORT 



f 
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2915 








2916 








2917 








2918 








2919 








2920 








2921 


01 1770 


0190004 




2922 


011772 


005067 


167304 


2923 


01 1776 


0B5067 


000306 


2921 


012C02 


005267 


167272 


2925 


012006 


0^2737 


002000 


2926 


012014 


01^1002 




2927 


012016 


1^4400 


012056 


2928 


012022 


013700 


000042 


2929 


a i pnia£, 

v ICvCv 


nC1 1 ii 1 1 
I0W i « i 1 




2930 


012030 


0^2760 


177777 


2931 


012036 


0t!ll001 




2932 


012340 


000005 




2933 


012042 


0id47ie 




293a 


012044 


0ld0240 




2935 


012046 


01^0240 




2936 


012050 


000240 




2937 


012052 


0(00137 


003620 


2938 


012056 


1'7607 


000377 



;*******•**••******•*«************« 

;tND OF PASS ROUTINt 
jiNCREMENT THE PASS NUMBE** 
»1F SW10«0 DINS THE TTY BtUL ON END OF PROGRAM 
JAF THERE IS A MONITOR GO TO IT, 
;iF NONE JUMP TO START 



$tOPI 


SCOPE 










STS TNM 


rZERO THE TEST NUMBER 




CLR 


STIMES 


rZERO THE NUMBER OF ITERATIONS 




INC 


SPASS 


t INCREMENT THE PASS NUMBER 




BIT 


«SWt0,««lSMR 


»RING THE BELL? 




BNE 


4S 


INO 




TYPE 


.SBELL 


fRING A DJ.NG 


4*: 


MOV 


**42,R0 


fGET MONHOR ADDRESS 




BEQ 


SDOAGN 


HF NONE 




CMP 


#-l,2CR03 






BNE 


SENUAD 






RESET 






StNOADi 


JSR 


PC, CR0D 


»G0 TO MONITOR 




NOP 




tSAVE ROOM 




NOP 




(FOR 




NOP 




lACTll 


suoagn: 


JMP 


#»START 


IRETURN 



SBELLS .ASCIZ <207><377><377> 
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2939 




















2940 










;***«***••** It 


********************************************************** 


2941 










f THIS ROUTINE 


IS THE SCOPt HANDLER 




2942 










:i>M14xl 


LOOP 


ON 


TEST 




2943 










fSWll»l- 


INHIBIT 


ITERATION* 




2944 










;i>W09El 


LOOP 


ON 


ERROR 




2945 










;6M08«1 


LOOP 


ON 


TEST IN SW<7:0> 




2946 










;IHE TEST NUMBER CSTSTNM) IS UPDATED 


AND DISPLAYED 


2947 


012062 








»>»C0PE: 










2948 


012062 


0«>6137 


177570 






ROL 




f«SWR 


ILOOP ON t-RESENT TEST? 


2949 


012066 


16)0502 








BMI 




SOVER 


JYES IF SW14»1 


2950 












;#####START OF COUE FOR THE XOR TESTER###»# 


2951 


012070 


0100416 






sxtstr: 


BR 




6S 


;IF RUNNING ON THE "XOR" TESTER CMANGE 


2952 




013746 














>THIS INSTRUCTION TO A "NOP" CNOP*240) 


2953 


012072 


000004 






MOV 




l>»EHRVEC,-CSP) 


>SAVE THE CONTENTS OF THE ERROR VtCTOR 


2954 


012076 


012737 


012116 


000004 




MOV 




«5S,#«ERRVEC 


>SET FOR IIMEOUT 


2955 


012104 


0ii'5737 


177060 






TST 




#«177060 


/TIME OUT ON XOR? 


2956 


012U0 


012637 


000004 






MOV 




(SP)+,#*Et<RVEC 


/RESTORE IHE ERROR VECTOR 


2957 


012114 


000457 








BR 




SSVLAO 


>G0 TO THt NEXT TEST 


2958 


012116 


022626 






5»: 


CMP 




CSP)*, CSPJ* 


/CLEAR THt STACK AFTER A TIME OUT 


2959 


012120 


012637 


000004 






MOV 




CSPJ*,#«EHRVEC 


/RESTORE THE ERROR VECTOR 


2960 


012124 


0100417 








BR 




74 


/LOOP ON IHE PRESENT TEST 


2961 


012126 








6»: 


;#####eNO OF COPE FOR THE XOR 


TESTER***** 


2962 


012126 


a-i2737 


000400 


177570 




BIT 




#SW08,*«SMR 


/LOOP ON apEC. TEST? 


2963 


012134 


001404 








BED 




as 


/BR IF NO 


2964 


012136 


123767 


177570 


167136 




CMPB 




*«SMR,STSrNM 


/ON THE RIGHT TEST? SWR<7:0> 


2965 


012144 


0101453 








BEQ 




SQVER 


/BR IF YES 


2966 


012146 


1105767 


167142 




2»: 


TSTB 




SERFLG 


(HAS AN E«ROR OCCURRED? 


2967 


012152 


0B1415 








BEQ 




3S 


/BR IF NO 


2968 


012154 


0J2737 


001000 


177570 




BIT 




i!tSW09,##SMR 


/LOOP ON tRROR? 


2969 


012162 


0101404 








BEQ 




as 


/BR IF NO 


2970 


012164 


016767 


167120 


167U4 


7»: 


MOV 




SLPfcRRf $L»'AOR 


/SET LOOP ADDRESS TO LAST SCOPE 


2971 


012172 


0100440 








BR 




SOVbK 




2972 


012174 


1B5067 


167114 




4»: 


CLRB 




SERPLG 


/ZERO THE ERROR FLAG 


2973 


012200 


0105067 


000104 






CLR 




STIMES 


/CLEAR THt NUMBER OF ITERATIONS TU MAKE 


2974 


012204 


0100415 








BR 




IS 


/ESCAPE TU THE NEXT TEST 


2975 


012206 


0i2T37 


004000 


177570 


3»: 


BIT 




• SMni**SMR 


/INHIBIT ITERATIONS? 


2976 


012214 


0101011 








BNE 




IS 


/BR IF YE* 


2977 


012216 


0115767 


167056 






TST 




SPASS 


/IF FIRST PASS OF PROGRAM 


29T8 


012222 


001406 








BEQ 




IS 


/ INHIBIT ITERATIONS 


2979 


012224 


005267 


167054 






INC 




SICNT. 


/INCREMENI ITERATION COUNT 


2980 


012230 


0<;6767 


000054 


167046 




CMP 




STIMES, SILNT 


/CHECK THt NUMBER OF ITERATIONS MADE 


2981 


012236 


0102016 








BGE 




SOVER 


/BR IF MOKE ITERATION REQUIRED 


2982 


012240 


012767 


000001 


167036 


1»J 


MOV 




#1, SICNT 


/REINITIALIZE THE ITERATION COUNTtR 


2983 


012246 


016767 


000040 


000034 




MOV 




SnXCNT, STIMES 


/SET NUMBtR OF ITERATIONS TO DO 


2984 


012254 


0^5267 


167022 




SSVLAO: 


INC 




STSTNM 


/COUNT TEST NUMBERS 


2985 


012260 


011667 


16T022 






MOV 




(SP) ,SLPAUR 


/SAVE SCO»'E LOOP ADDRESS 


2986 


012264 


011667 


167020 






MOV 




t3P3 .SLPEHR 


/SAVE ERRUR LOOP ADDRESS 


2987 


012270 


005067 


000500 






CLR 




SESCAPE 


/CLEAR THt ESCAPE FROM ERROR ADDRtSS 


2988 


012274 


016737 


167002 


177570 


SUVER: 


MOV 




STSTNM, •#UISPLAY 


/DISPLAY lEST NUMBER 


2989 


012302 


016716 


167000 






MOV 




SLPADR, CSf*: 


/FUDGE REIURN ADDRESS 


2990 


012306 


000002 








RTI 






/FIXES PS 


2991 


012310 


000000 






STiMES: 









/NUMBER Of ITERATIONS TO PERFORM 


2992 


012312 


000000 






siixcNT: 









/MAX. NUMBER OF ITERATIONS 
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DCKBRE.Pll 



MACYll 27 (657) atf.MAY-75 UI33 PAGE 62 
ACCEPT QCTAU NUMBtR FROM THE TTY 



2993 
















2994 








(KQUTINE 


: TO ACCEPT AN OCTAL NUMBER FROM THE TTY 


2995 








1 ^AUU t 








2996 








) ' 


Ate 




fPUT OCTAL NUMBER IN ADDR 


2997 








1 








S99S 


213314 






SACCEPT ! 








2999 


012314 


010046 






MOU 


R0i* CSP) 


yPUSH R0 UN STACK 


3000 


012316 


010146 






MOV 


R I # * (SP) 


IPUSH Rl UN STACK 


3001 


012320 


010246 






MOV 


R2 1 *" C5P3 


(PUSH R2 UN STACK 


3002 


012322 


010346 








R3 * (SP) 


IPUSH R3 U|t4 STACK 


3003 


012324 


016600 


000010 




MOV 




IGET ADDRESS POINTER OF WHERE TO 


3001 


012330 


0^500 1 




1 a : 


CLR 


R 1 


(CLEAR PARTIAL NUMBER 


3005 


012333 


012702 


000006 




MOV 


• 6i K2 


(MAX. # OF DIGITS ALLOWED 


3006 


012336 


1^4402 




2*1 


GETCHR 




IGET ONE CHARACTE" 


3007 


012340 


1 12603 






MOVB 


CSP)^iR3 


lANO PUT IT IN R3 


3008 


012342 


1 10367 


000102 




M0V8 


R3i 6S 




3009 


012346 


ll<)4400 


012450 




TYPE 


f 6S 


(ECHO THE CHARACTER 


3010 


012352 


022703 


000015 




CMP 


*lSf R3 


(lilAS THIS CHARACTER A "CR"7 


301 1 


012356 


0^1422 






BED 


5S 


(BK IF YES 


3012 


012360 


0<!2703 


000060 




CMP 


*'0r R3 


(INSURE THE CHARAt^TER IS 


3013 


012364 


01^3014 






BCT 


4S 


(A DIGIT BETWEEN U AND 7. 


3014 


012366 


022703 


000067 




CMP 


#'7# R3 




3815 


012372 


at^Sflll 






BLT 


4^ 




3016 


012374 


01^5302 






DEC 


R2 


(CHECK NUMBER OF CHARACTERS 


3017 


012376 


01^2407 






BUT 


4S 


(BR IF TO MANY 


3018 


012400 


006301 






ASL 


R 1 


(POSITION PARTIAL NUMBER 


3019 


012402 


01^6301 






^su 


R 1 


(FOR THIS DIGIT 




i 2404 














3021 


012406 


042703 


177770 




BIC 


#-'C<7»iR3 


(GET RID OF THE ASCII JUNK 


3022 


012412 


0^0301 






BIS 


R3( K 1 


(COMBINE THIS DIGIT WITH PARTIAL 


3023 


012414 


0t>0750 






BR 


2S 


(GO GET ANOTHER Di^GIT 


3024 


012416 


lk)44e0 


012452 


4»: 


TYPE 


, SOUCS 


(TYPE 


302S 


012422 


000742 






BR 


1 s 


(GO START OVER 


3026 


012424 


lt94U00 


012454 


5»: 


TYPE 


> $UF 


(FOLLOW "CR' WITH A "LF" 


3027 


012430 


010130 






MOV 


Rl f ' CR0) * 


(PASS THE NUMBER 10 THE USER 


302S 


012432 


010066 


000010 




MOV 


R0> 10(SP] 


(SET FOR RETURN 


3029 


012436 


012603 






MOV 


ISP'S*, 


(POP STACK INTO R3 


3030 


012440 


012602 






MOV 


CSP] +rR2 


(POP STAC^ INTO R2 


3031 


012442 


012601 






MOV 


CSP] '^fRl 


(POP STAC<^ INTO Rl 












MOV 




(POP STACK INTO R0 


3033 


012446 


000002 






RTl 






3034 


012450 


000 


000 


6»: 


.BYTE 


0(0 


(STORAGE FOR ASCII CHAR. AND TERMINATOR 


3035 


012452 


077 




SUUES! 


.ASCII 




(QUESTION MARK 


3036 


012453 


015 




SURtFl 


.ASCII 


<15> 


(CARRAIGE RETURN 


3037 


012454 


01110012 




SUFI 


.ASCIZ 


<12> 


(LINEFEED 


3038 














(SELECTED REGISTER FROM THE TTY 


3039 














CHARACTER FROM THE [TV 


3040 








»!HIS ROUTINE 


INPUTS A SINGLE 


304} 
















3042 








1 








3043 








t 


GETCMR 




(INPUT A SINGLE ClAHACTER FROM THE TTY 


3044 








t 


RETURN 


HERE 


(CHARACTER IS ON jHE STACK 


3045 








t 








3046 


012456 


01 1646 




SXEADCt 


MOV 


CSP) ,-tSPJl 


IPUSH DOWN THE PC 
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3847 


012460 


016666 


000004 


000002 




MOV 


4CSP),2(S>') 


(SAVE THE PS 


3048 


012466 


111)5777 


000126- 




l»l 


tstb 


»TKS 


(WAIT FOR 


3049 


012472 


100375 








bpl 


IS 


(A CHARACTER 


3OS0 


012474 


117766 


000122 


000004 




MOVB 


•TKB,4(8PJ 


(READ THE TTY 


3051 


012502 


042766 


177600 


000004 




BIC 


•-C<l77>,4(sp) 


(GET RID OF JUNK iF ANY 


3052 


012510 


000002 








rti 




(GO BACK TO USER 


3053 










f***************************** 


ll*********************************!)****** 


3054 










( IHIS ROUTINE 


INPUTS A STRING 


FROM THE TTY 


3055 










(tALL: 








3056 














ITNPIJT It RTRTNC FKOM THF TTY 


3057 










( 


RETURN 


HERE 


(ADDRESS OF FIRST CHARACTER WILL BE ON THt 


3058 










( 






(TERMINATOR WILL >»E A BINARY B 


3059 










! 




P3,-C3P) 


(SAVE R3 


3060 


012512 


010346 






SHEADS! 


MOV 


3061 


012514 


012703 


012624 




1»« 


MOV 


»STTYIN,Ri 


(GET ADDRESS 


3062 


012520 


0<i2703 


012634 




2»: 


CMP 


#ITTYIN*8.,R3 


(BUFFER FULL? 


3063 


012524 


lt!ll405 








BLOS 


4$ 


(BR IF YES 


3064 


012526 


lt>a402 








GETCHR 




(GO READ ONE CHARACTER FROM THE TTY 


3065 


012530 


U2613 








MOVB 


CSP)*, tR3J 


(GET CHARACTER 


3066 


012532 


l<i2713 


0PI0177 






CMPB 


•177, CR3) 


IIS IT A RUBOUT 


3067 


012536 


0101003 








BNE 


3S 


ISKIP IF NOT 


3068 


012540 


104400 


012452 




4»: 


TYPE 


,sauES 


(TYPE A '?• 


3069 


012544 


0140763 








BR 


IS 


(ZAP THE BUFFER AND LOOP 


3070 


012546 


111367 


000044 




3»! 


MOVB 


CR3) ,8S 


(ECHO THE CHARACTtR 


3071 


012552 


104400 


012616 






TYPE 


,BS 




3072 


012556 


1^2723 


000015 






CMPB 


#15, CR3)* 


(CHECK FOR RETURN 


3073 


012562 


0101356 








BNE 


2S 


ILOOP IF NOT RETURN 


3074 


012564 


105063 


177777 






CLRB 


-l(R3) 


(ZAP RETURN (THE i5) 


3075 


012570 


1104400 


012454 






TYPE 


,SLF 


(TYPE A LINE FEED 


3076 


012574 


012603 








MOV 


tSP)+,R3 




3077 


012576 


011646 








MOV 


(SP3,-CSPi 


(ADJUST THE STACK AND PUT ADDRESS OF THE 


307B 


012600 


016666 


000004 


000002 




MOV 


4CSP),2(Sf') 


1 FIRST ASCII CHARACTER ON IT 


3079 


012606 


012766 


012624 


000004 




MOV 


»STTYIN,4lSP) 




3080 


012614 


000002 








RTI 




(RETURN 


3081 


012616 


000 






8*: 


.BYTE 





(STORAGE FOR ASCIi CHAR, TO TYPE 


3082 


012617 


000 








.BYTE 





(TERMINATOR 


3083 


012620 


l'756a 






TKSt 


177560 




(TTY KBD STATUS 


3084 


012622 


ri'7562 






TKb: 


177562 




ITTY KBD BUFFER 


3085 


012624 


000010 






$1 tyin: 


.BLKB 


8. 


(RESERVE 8 BYTES fOR TTY INPUT 


3086 
















IFROM THE TTY 
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3087 

3088 >**•**•**.***************< 



3089 










jtHIS ROUTINE 


IS THE HLT HANDLER 




3090 












LOOP 


ON ERROR 




3091 










>OM10>1 


BELL 


ON ERROR 




309a 










;i>Ni3«i 


INHIBIT ERROR TVPtQUTS 




3093 










;i>Mi5<i 


HALT 


ON ERROR 




3090 










IbO TO 


TYPERR 


ON ERROR 




3095 


012634 








si^LT: 








309fe 


012634 


0*^2777 


000001 


166760 




BIC 


»8IT0,#PAHITY 




3097 


012642 


1 12767 


000001 


166444 




MOVB 


#l,SERFLG 


JSET THE tRiJOR FLAG 


3098 


012650 




002000 


177570 




BIT 


*SW10.#«SMR 


>BELL ON tRROR? 


3099 


012656 


Spinas 








BEO 


IS 


JNO - SKIf 


3100 


012660 


1 1114400 


012056 






TYPE 


»»3ELL 


IRING BELL 


3101 


012664 


0105267 


166422 




1»! 


INC 


SERTTL 


JCOUNT THt NUMBER OF ERRORS 


3102 


012670 


011775 








SEO 


1$ 


? INSURE SERTTL NOT«0 


3103 


012672 


011667 


166426 






MOV 


CSP) ,$HLT*D 


>G£T ADDRESS OF HLT INSTRUCTION 


3104 


012676 


162767 


000002 


166420 




SUB 


«2|SHLTAD 




3105 


012704 


1 17767 


166414 


166410 




MOVB 


»$HLTAD,$1TEMB 


fSTRIP ANU SAVE THE ERROR ITEM COUE 


3106 


012712 


0.J2737 


020000 


1 77570 




BIT 


«SM13,#*SHR 


?SKIP TYPfOUT IF SET 


3107 


012720 


eI9lSI04 








BNE 


2S 


JSKIP TYPtOUTS 


3108 


012722 


000737 


012776 






JSR 


PC,»#TYPEKR 


fGO TO UStR ERROR ROUTINE 


3109 


012T26 


114400 


012453 






TYPE 


,SCRLF 




3110 


012732 


0l''5737 


177570 




2»: 


TST 


»«SMR 


>HALT ON tRROR 


3111 


012736 


100001 








8PU 


3S 


ISKIP IF LQNTINUE 


3112 


012740 


000000 








HALT 




IHALT ON 6RR0R1 


3113 


012742 


0'i2737 


001000 


177570 


3»i 


BIT 


*SW09,##S'IR 


ILOOP ON tRROR SWITCH SET? 


3114 


012750 


001403 








BEQ 


4$ 


>BR IF NO 


3115 


012752 


016716 


166332 






MOV 


SLPERR, est;') 


IFUOGE REiURN FOR LOOPING 


3116 


012756 


000002 








RTI 






3117 


012760 


005767 


000010 




a»t 


TST 


SESCAPE 


>CHECK FQK AM ESCAPE ADDRESS 


3118 


012764 


001402 








BEO 


5$ 


»8R IF NONE—TAKE NORMAL RETURN 


3119 


01S766 


016716 


000002 






MOV 


SESCAPE, CSP) 


IFUOGE REIURN ADDRESS FOR ESCAPE 


3120 


012772 


000002 






5»: 


RTI 






3121 


012774 


000000 






StSCAPEl 





lESCAPE ON ERROR ADDRESS 


3122 
















^MESSAGE lYPEOUT ROUTINE 


3123 
















fDEFINED BY 'TYPERR' AND 


3124 
















nST INSTKUCTION OF ERROR 'HLT' 


3125 
















JROUTINE 


3126 
















3127 










t 








3128 










; IHIS ROUTINE 


WILL TYPE OUT THE ERROR 


MESSAGES 












1 








3130 


















3131 


012776 


104400 


012453 




ttperr: 


TYPE 


,«CRLF 


ITYPE A CARRIAGE RETURN 


3132 
















JAND LINE FEED 


3133 


013002 


010046 








MOV 


R0,'-CSP: 


;SAVE R0 CONTENTS 


3134 


013004 


005000 








CLR 


R0 


/CLEAR R0 


3135 


013006 


116700 


166310 






MOVB 


SITtMB.R0 


;PICK UP IHE ITEM INDEX 


3136 


013012 


0135300 








DEC 


R0 


/ADJUST T"E INDEX 


3137 


013014 


006300 








ASL 


R0 


;S0 IT WILL MORK FOR 


3138 


013016 


006300 








ASL 


R0 


>FOR THE tRROR TABLE 


3139 


013020 


006300 








ASL 


R0 




3140 


013022 


062700 


001500 






ADD 


#SEKRTB,R0 


IFORM THE TABLE POINTER 
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,P11 
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3141 


013026 


012067 


000002 


MOV 


(ROJ'frlS 


»PICK UP 'ERROR MESSAGE' POINTER 


3142 


013032 


104400 




TYPE 




»TYPE 'ERftOR MESSAGE' 


3143 


013034 


000000 


1*1 







/'ERROR MtSSAGE' POINTER GOES HERt 


3144 


013036 


104400 


012453 


TYPE 


fSCRLF 


/TYPE A CARRIAGE RETURN AND 


3145 












/LINE FEE" 


3146 


013042 


012067 


000004 


MOV 


(R0)*,2S 


/PICK UP 'DATA HEADER' POINTER 


3147 


013046 


001402 




BEQ 


3$ 


/IF '0' DON'T TYPE 


3148 


013050 


104400 




TYPE 




/TYPE 'DAIA HEADER' 


3149 


013052 


000000 


2»: 







/'DATA HEADER' POINTER GOES HERE 


3150 


013054 


104400 


012453 3a: 


TYPE 


,$CRLF 


/TYPE A CARRIAGE RETURN AND 


3151 












/LINE FEEU 


3152 


013060 


012000 




MOV 


(R0}+,R0 


/PICK UP 'DAT* POINTER' 


3153 


013062 


001004 




BNE 


5S 


/IF THERE* IS DATA TO TYPE GO DO IT 


3154 


013064 


012600 


4»: 


MOV 


(SP)t,R0 


/RESTORE '<0 


3155 


013066 


104400 


012453 


TYPE 


,$CRLF 


/TYPE A CARRIAGE RETURN AND 


3156 










/AND LINE FEED 


3157 


013072 


000207 




RTS 


PC 


/RETURN TU TESTING 


3158 


013074 




5»: 








3159 


013074 


013046 




MOV 


#(R0) + ,-(i»P) 


/SAVE #(R0)+ FOR TYPEOUT 


3160 












/TYPE DAT* 


3161 


013076 


004067 


000246 


JSR 


R0,iB2QCT 


/GO TYPE!--OCTAL ASCII 


3162 


013102 


006 




• BYTE 


6 


/TYPE 6 DIGITS 


3163 


013103 


001 




.BYTE 


1 


/TYPE LEADING ZEROS 


3164 


013104 


005710 




TST 


CR0) 


/HAVE WE KEACHED THE '0' TERMINATOR 


3165 


013106 


001766 




BEQ 


4S 


/YES - CLtAN UP FOR RETURN 


3166 


013110 


104400 


013116 


TYPE 


,6S 


/TYPE 5 S^'ACES 


3167 


013114 


000767 




BR 


5S 


/LOOP TILL '0' TERMINATOR REACHED 


3168 


013116 


0^0040 


020040 000040 6*: 


.ASCIZ 


/ / 




3169 








.EVEN 
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31T0 
3171 
31T2 
3173 
3170 
3175 
3176 
3177 
3178 
3179 
318e 
3181 
3182 
3183 
3184 
3185 
3186 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 

3198 
3199 
3200 
3201 
3202 
3203 
3204 
320S 
3206 
3207 
3208 
3299 
3il0 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
3222 
3223 



I********************************************************************** 
I 

|1HE FOLLOMINS ROUTINE MILU SIZE MEMORY 
1 

l»LSTBLK WIUL CONTAIN THE LAST BANK AS AN SAP (SEl>HENT ADDRESS FIELD) 
I 

(THE SE6MENT ADDRESS FIEU" CONTAINS THE 4 MOST SIGNIFICANT BITS OF 

MHE LAST ADDRESS OF THE LAST BANK FOUND 

I 



013124 


010546 






S&I2E i 


MOV 


RSi CSP) 


ISAVE R5 LqnTENTS 


013126 


010605 








MOV 


SP,H5 


iSAVE THE'STACK POINTER 


013132 


012703 


077406 






MOV 


#77406, H3 




013134 


010377 


165050 






MOV 


R3,*KPDR0 


ISET THE ^OLLOMING PAGE 


013140 


0ll3377 


165046 






MOV 


R3>#KP0Rt 


lOESCRIPTUR REGISTERS TO 


013144 


040377 


165044 






MOV 


R3(#KPDR2 


fREAD/WRIlE AND TRANSFER OF 


013150 


010377 


165042 






MOV 


R3,'KPDR3 


14096 (10j WORDS PER SEGMENT 


013154 


010377 


165040 






MOV 


R3>fKPDR4 




013163 


010377 


165836 






MOV 


R3,#KP0R5 




013164 


010377 


165034 






MOV 


R3,*KP0R6 




013173 


010377 


165032 






MOV 


R3,*KPDR7 




013174 


005077 


165030 






CLR 


*KPAR0 


>SET THE FOLLOWING PAGE 


013200 


012777 


030209 






MOV 


!li20@«#KPA-l 


;adore33 Sesisters to theis 


013206 


0i2T77 


000400 


165020 




MOV 


#400,#KPA*<2 


FRESPECTIYE OFFSET VALUES 


013214 


012777 


000600 


165014 




MOV 


•600i#KPA'<3 


>FOR RELOCATION PURPOSES 


013222 


012777 


001000 


165010 




MOV 


«i000,#KPAR4 


01323? 


012777 


001200 


165004 




MOV 


«1200(*KPAR5 
















«i400fPKpAn6 




013244 


012777 


007600 


164774 




MOV 


«76e)0,*KPAR7 f 


ITHIS ONER'S THE I/O RECORD 














fPAGE CONTAINING CONTROL STATUS 
fREGISTER*, ETCt 


013252 


016704 


164766 






MOV 


KPAR6,R4 


IGET ADDRESS OF PAGE 6 REGISTER 


013256 


005014 








CLR 


(R4] 


ICLEAR TH^ REGISTER 


013260 


0(<i5277 


164720 






INC 


#SR0 


(TURN ON MEMORY MANAGEMENT 


013264 


010746 








MOV 


PCi-(SP) 


FMAKE KTtl TIMEOUT SERVICE 


013266 


062716 


000026 






AOD 


#»KTOUT-,i (SP) 


^ROUTINE ADDRESS POSITION 
riNDEPENDCNT 


013272 


012637 


000004 






MOV 


C5P)+,#«E'<RVEC 


>SET FOR IIMEOUT 


013276 


0»5737 


143776 




1»! 


TST 


•#143776 


»TRAP ON NON-EXISTENT MEMORY 


013393 


362? S<! 


seesus 








#48, (S4) 


;make a iR STEP 


013306 


027714 


164734 






CMP 


#KPAR7, (R4) 


ILAST ONE' 


013312 


0a337l 








B6T 


IS 


INO - TRY ITl 


013314 


011400 






*^TOUTl 


MOV 


(R4) ,R0 


IGET LAST BANK +1 


013316 


162700 


000040 






SUB 


#40, R0 


;OROP BACK 


013322 


012737 


000006 


000004 




MOV 


*6,#«ERRVkC 


;SET FOR tRRORS 


013330 


010506 








MOV 


R5,SP 


IRESTORE THE STACK POINTER 


013332 


010067 


000010 






MOV 


R0,SLSTBLK 


1 STORE THt SAF 


B13336 


0(45077 


164642 






CLR 


«SR» 


ITURN MEMURY HGHT OFF 


813342 


012605 






l»j 


MOV 


(SP)*,R5 


IRESTORE N5 


013344 


0140207 








RTS 


PC 


1 RETURN TU NORMAL FLOW 


013346 


000000 






sustblk: 


.vIORD 


ICONTAINS THE SAF 










f ****** 


t****************************** 


*****•*•*•***•***•****•*••*•*•••* 










»BINARY 


TO OCTAL (ASCII) AND TYPE 












J»B20CT 


—ENTER 


HERE TO StTUP SUPPRESS 


ZEROS AND NUMBER OF DIGITS TO TYPE 



IINDEC 


-U-DCKBR-t 


MACYll 


27 (657) 214-MAY- 


75 14:33 PAGE 67 








KBRE.Pll 




BINARY 


TO OCTAL (ASCII) 


AND TYPE 








3224 








i^-all: 












3225 










MOV 


NUM,-(SP) 




\ 


(NUMBER TU BE TYPED 


3226 










JSR 


R0,SB2OCT 






ICALL FOR TYPEOUT 


3227 










.BYTE 


N 






|N»1 TO 6 FOR NUMBER OF DIGITS TO TY 


3228 










.BYTE 


M 






|M«1 OR 


3229 


















|l«TYPE LEADING ZEROS 


3230 


















fitiSUPPRESS LEADING ZEROS 


3231 




















3232 








l»B201- 


ENTER 


HERE TO TTPE OUT 


WITH 


THE SAME PAMAMETERS AS THE LAST 8B2UCT 


3233 








'tALL! 












3234 










MOV 


NUM,-(SP) 








3235 










JSR 


Ri4, 18201 








3236 


















t 


3237 








I»B2016 


—ENTER 


HERE FOR lYPEOUT 


OF A 


U 


BIT NUMBER 


3238 








ii-all: 












3239 










MOV 


NUM,-(SP) 








3240 










JSR 


R0,»BeO16 








3241 




















3242 


013350 


112067 


000201 


$t»2acT: 


MOVB 


(R0) *,S0MUDE*1 






IPICKUP THE NUMBER OF DIGITS TO TYPE 


3243 


013354 


1 12067 


000173 




MOVB 


(R0)+,S0F1LL 






IGET THE ^ERO FILL SWITCH 


3244 


013360 


000406 






BR 


SB2U1 








3245 


013362 


U2767 


000001 


000163 SB2016: 


MOVB 


•1.S0FILL 






ISET THE 4ER0 FILL SWITCH 


3246 


013370 


112767 


000006 


000157 


MOVB 


«6.SOMODE'»1 






ISET FOR SIX(6) DIGITS 


3247 


013376 


112767 


000005 


000146 It>20i: 


MOVB 


»5,>0CNT 






ISET THE ITERATION COUNT 


3248 


013404 


010346 






MOV 


R3,-(SP) 






ISAVE R3 


3249 


013406 


010446 






MOV 


R4,-CSP) 






ISAVE R4 


3250 


013410 


010546 






MOV 


R5,-(SP) 






ISAVE RS 


3251 


013412 


116704 


000137 




MOVB 


S0MODE+l,K4 






IGET THE NUMBER OF DIGITS TO TYPE 


3252 


013416 


0ID54 04 






NEG 


R4 








3253 


013420 


062704 


000006 




ADO 


«6,R4 






ISUBTHACT IT FOR MAX. ALLOWED 


3254 


013424 


110467 


000124 




MOVB 


R4,$0M0DE 






ISAVE IT fOR USE 


3255 


013430 


116704 


000117 




MOVB 


S0F1LL,R4 






IGET THE <ERO FILL SWITCH 


3256 


013434 


016605 


000010 




MOV 


la(SP) ,R5 






IPICKUP THE INPUT NUMBER 


3257 


013440 


0145003 






CLR 


R3 






ICLEAR THt OUTPUT WORD 


3258 


013442 


0146105 




1»! 


ROL 


R5 






IROTATE MSB INTO "C" 


3259 


013444 


01^0404 






BR 


3S 






ICO DO MSB 


3260 


013446 


0'^6105 




2»l 


ROL 


R5 






IFORM THIS DIGIT 


3261 


013450 


0B6105 






ROL 


R5 








3262 


013452 


006105 






ROL 


R5 








3263 


013454 


010503 






MOV 


RS,N3 








3264 


013456 


0146103 




3»! 


ROL 


R3 






IGET LSB UF THIS DIGIT 


3265 


013460 


1145367 


000070 




DECS 


SOMOOE 






ITYPE THIS DIGIT? 


3266 


013464 


100016 






BPL 


7» 






I8R IF NO 


3267 


013466 


042703 


177770 




6IC 


•177770, Ri 






IGET RID UF JUNK 


3268 


013472 


001002 






BNE 


4S 






ITEST FOR 


3269 


013474 


0145704 






TST 


R4 






ISUPPRESS THIS 07 


3270 


013476 


001403 






BED 


5S 






IBR IF YES 


327; 


si jSSS 


2i43eei 




45 i 


iisc 


H4 






lOON'T Su^'PStSS ANYMORE B'S 


3272 


013502 


0S2703 


000060 




BIS 


#'0,R3 






IMAKE THIS DIGIT ASCII 


3273 


013506 


0ti27O3 


000040 


5*1 


BIS 


«' ,R3 






IMAKE ASCII IF NOT ALREADY 


3274 


013512 


110367 


000032 




MOVB 


R3.8S 






ISAVE FOR TYPING 


3275 


013516 


104400 


013550 




TYPE 


,81 






JGO TYPE 'HIS DIGIT 


5276 


013522 


1145367 


000024 


7»i 


DECB 


socnt 






ICOUNT BY 1 


3277 


013526 


003347 






BGT 


2i 






IBR IF MO«E TO 00 
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DCKBRE.Pll BINARY TO OCTAL tASCII) AND TYPE 



3278 


013530 


01^2402 




BUT 


6$ 




fBR IF DONE 


3279 


013532 


005204 




INC 


R4 




> INSURE L*ST DIGIT ISN'T A BtANK 


3260 


013534 


000744 




BR 


2S 




IGO DO THt LAST DIGIT 


326 1 


013536 


012605 


b* 1 


MOV 


(SP) + 1 


rR5 


IRESTORE ^5 


3262 


013540 


012604 




MOV 


(SP)*, 


,R4 


IRESTORE «4 


3263 


013542 


012603 




MOV 


(SP)+, 


.R3 


IRESTORE K3 


3284 


013544 


012616 




MOV 


(SP)*i 


, CSPJ 


JSET THE STACK FOR RETURNING 


3285 


013546 


000200 




RTS 


R0 




IRETURN 


3286 


013550 


000 


a»: 


• BYTE 







ISTOHAGE l-OR ASCII DIGIT 


3287 


013551 


000 




.BYTE 







ITERMINATUR FOR TYPE ROUTINE 


3288 


013552 


000 


jucnt: 


.BYTE 







rOCTAL DIl«IT COUNTER 


3289 


013553 


000 




.BYTE 







(ZERO FII.I- SWITCH 


3290 


013554 


01^0000 


SUHODE: 









/NUMBER Of DIGITS TO TYPE 



MAINDEC-U-DCKBR-t MACYll 27(657) 2iiJ-MAY-75 14:33 PAGE 69 

DCKBRE.Pll TRAP HANDLER 



3291 
















3292 








;*••****•*****••••«*******•** 


****************** 


************************ 


3293 








>TRAP HANDLER 








3294 


013556 


010046 




STRAPt MOV 


R0,-CSP3 


rSAVE R0 




3295 


013560 


016600 


00000S 


MOV 


aCSP) ,R0 


>GET TRAP ADDRESS 


3296 


013564 


0I<)S740 




7ST 


-(Rid) 


rBACKUP BY 2 




3297 


013566 


111000 




MOVB 


(Re) >R0 


JGET RIGHT BYTE 


Of TRAP 


3298 


013570 


016000 


013576 


MOV 


STRPADCR0J ,R0 


MNOEX TO TABLE 




3299 


013574 


000200 




RTS 


R0 


;go to routine 




3300 
















3301 
















3302 








?IRAP TABLE 








3303 








1 ROUTINE 








3304 
















3305 


013576 


0B1U0 




SIRPAO: STYPE 


;CALL»TYPt 


TRAP'^0(104400) 


TIY TYPEOUT ROUTINE 


3306 


013'>00 


012456 




SREAOC 


KALL«GETCHR 


TRAP+2(104402) 


TIY TYPEIN CHARACTER ROUTINE 


3307 


013602 


012512 




SREAOS 


;CALL»GET5>TR 


TRAP«'4(10a404) 


TIY TYPEIN STRING ROUTINE 


3308 


013604 


012314 




SACCEPT 


»CALL«ACCtPT 


TRAP+6(104406) 


RtAO AN OCTAL NUMBER FROM TTY 
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3309 








3310 








331 1 








3312 


013606 


012737 


013734 


3313 


013614 


012737 


000340 


3314 


013622 


010046 




3315 


013624 


010146 




3316 


013626 


010246 




3317 


013630 


010346 




3313 


013632 


010446 




3319 


013634 


010546 




3320 


013636 


010667 


000076 


3321 


013612 


012737 


0136S4 


3322 


013650 


0^0000 




3323 


013652 


01^0776 




3324 








3325 








3326 


013654 


016706 


000060 


3327 


013660 


0^5067 


000054 


3328 


013664 


01^5267 


000050 


3329 


013670 


0^1375 




3330 


01367a 


012605 




3331 


013674 


012604 




3332 


013676 


012603 




3333 


013700 


012602 




3334 


01370a 


012601 




3335 


013704 


012600 




3336 


a* 372^ 




013606 


3337 


013714 


012737 


000340 


3338 


013722 


1(1)4400 


013742 


3339 


013726 


012716 


001706 


3340 


013732 


0«)0002 




3341 


013734 


0ki0aeie 




3342 


013736 


0l«0776 




3343 


013740 


000000 




3344 


013742 


0ld501S 


047520 


3345 


013750 


000122 




3346 









ISOMER DOWN ROUTINE 



S^WRONI 


HOV 


#SILLUP»#*PMRVEC 




MOV 


• 34il,««PMKvEC + 2 




MOV 


RB,-{SP) 




MOV 


R1.-CSP5 




MOV 


R2,-CSP) 




MOV 


R3»-CSP) 




MOV 


R4,-C5P3 




MOV 


R5,-tSP) 




MOV 


SP,SSAVR6 




MOV 


«SPWRUP>f*PWRVEC 




MALT 






BR 


.-2 


1 ****** 

jKOWER 


UP ROUTINE 


SI'MRUP: 


MOV 


SSAVR6,SP 




CUR 


SSAVR6 


l»l 


INC 


SSAVR6 




BNE 


IS 




MOV 


CSP)+,R5 




MOV 


tap)*,, us 




MOV 


CSP3+,H3 




MOV 


CSP)+,H2 




MOV 


C8PJ*,R1 




MOV 


(SP)+,R0 






• ir wROri t WR vEC 




MOV 


#340,»#PW»<VEC*2 




TYPE 


,SPOWER 




MOV 


•BEGIN, CSI'] 




RTI 




sillup: 


HALT 






BR 


.-2 


$»AVR6! 







S^'OWERt 


.ASCIZ 


<15><12>"H0WER'' 



ISET FOR fAST UP 
;PRI0I7 

JPUSH R0 UN STACK 

IPUSH Rl UN STACK 

IPUSH R2 UN STACK 

»PUSH R3 UN STACK 

IPUSH R4 UN STACK 

IPUSH R5 UN STACK 
ISAVE SP 
ISET UP VICTOR 

IHANG UP 



IGET SP 

IWAIT LOOf FOR THE TTY 
IWAIT FOR THE INC 
I OF WORD 

IPOP STAC^ INTO R5 

;POP STACft INTO R« 

IPOP STAC^ INTO R3 

IPOP STAGS INTO R2 

IPOP STACft INTO Rl 

IPOP STAC"^ INTO R0 

ISET UP Tfc POWER dOwn VtCTOR 

IPRI0I7 

IPOWER FA^L MESSAGE 
IRESTART AT BEGIN 

ITHE POWEH UP SEQUENCE WAS STARTEU 
I BEFORE I HE POWER DOWN MAS COMPLETE 
I PUT THE Sp HERE 



.EVEN 
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POWER DOWN AND UP ROUTINES 



3347 














•******************************************************* 


3348 










1 






3349 










ICRROR 


AND MESSAGE TABLE UQNOIHENTS 


3350 










I 






3351 














•****«***********************»************************** 


3352 
















3353 


013752 


0*2524 


052123 


042040 


EMi: 


.ASCIZ 


/TEST DIDN'T ABORT / 


3354 


013760 


0**2lll 


023516 


020124 








3355 


013766 


0'*1101 


051117 


020124 








3356 


013774 


000040 












3357 


013776 


0*0506 


040524 


020114 


£"21 


.ASCIZ 


/FATAL ERKOR TO PROGRAM / 


3358 


014004 


0!>ll05 


0475a2 


020122 








3359 


014012 


0'»7524 


050040 


047522 








3360 


014020 


0^1107 


046501 


020040 








3361 


014026 


000 












3362 


014027 


101 


047502 


052122 


EH3I 


.ASCIZ 


/ABORTED INCORRECTLY / 


3363 


014034 


0*2105 


044440 


041516 








3364 


014042 


0i>1117 


042522 


052103 








3365 


014050 


0:>4S14 


020040 


000 








3366 


014055 


116 


020117 


040520 


EM4: 


.ASCIZ 


/NO PARITY MEMORY FOUND BELOW 28K / 


3367 


014062 


044522 


054524 


046440 








3368 


014070 


046505 


051117 


020131 








3369 


014076 


0*7506 


047125 


020104 








3370 


014104 


0*2502 


047514 


020127 








3371 


014112 


0'i4062 


020113 


000040 








337a 


014120 


0*2522 


042523 


020124 


EM5! 


.ASCIZ 


/RESET OQtSN'T WORK / 


3373 


014126 


0*7504 


051505 


023516 








3374 


014134 


0<!0124 


047527 


045522 








3375 


014142 


01^0040 


000 










3376 


014145 


125 


042523 


020122 


EM6: 


.ASCIZ 


/USER SELtCTEO REGISTER NOT PRESENT / 


3377 


014152 


0*2523 


042514 


052103 








3378 


014160 


0*2105 


051040 


043505 








3379 


014166 


0S1511 


042524 


020122 








3380 


014174 


0*7516 


020124 


051120 








3381 


014202 


051505 


047105 


020124 








3382 


014210 


0140040 












3383 


014212 


0*7516 


050040 


051101 


EM7: 


.ASCIZ 


/NO PARITY MEMORY FOUND AT ALL / 


3384 


014220 


0^2111 


020131 


042515 








3385 


014226 


0*7515 


054522 


043040 








3386 


014234 


052517 


042116 


040440 








3387 


014242 


edeiaa 


046101 


020114 








3388 


014250 


0140040 












3389 


014252 


0*4504 


047104 


052047 


EMIOI 


.ASCIZ 


/DIDN'T ABORT OR RECOGNIZE STACK VIOLATION / 


3390 


014260 


04Oa40 


047502 


052122 








3391 


014266 


0*7440 


020122 


042522 








3392 


014274 


0*7503 


047107 


055111 








3393 


014302 


01^0105 


052123 


041501 








3394 


014310 




044526 










3395 


014316 


0^2101 


047511 


020116 








3396 


014324 


000040 












3397 


014326 


0*1101 


051117 


042524 


EMllI 


.ASCIZ 


/ABORTED BUT STACK VIOLATION NOT KgcOGNIZED / 


3398 


014334 


020104 


052502 


020124 








3399 


014342 


0=2123 


B415B1 


020113 








3400 


014350 


0*4526 


046117 


052101 
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DCKBRE, 


Pll 




POWER DOMN AND 


UP HOUTINES 




3401 


0143S6 


047511 


020116 


047516 








3402 


014364 


0<iO124 


042522 


047503 








3403 


014372 


047107 


0551 1 1 


042 1 05 








3404 


014400 


0^0040 


000 










3405 


014403 


123 


040524 


045503 


E 


• 


/S7ACK VIULATIDN PICKED UP BUT ABORT NOT RECOGNIZED / 


3406 


014410 


0^3040 


04751 1 


0405 1 4 








3407 


014416 


044524 


047 117 


050040 








3408 


014424 


0'*15ll 


04251 3 


iH 3n 1 nil 








3409 


014432 


0bai25 


Ail 1 a An 


Scf If 1 








3410 


014440 


0<*0aao 


047502 


05c 1 ec 








34U 


014446 


a'*7040 


052 117 


051040 








3412 


014054 


041505 


043517 










3413 


014462 


0'*253a 


020104 


000040 








3414 


014470 


0^1120 




n ii n^33 

U4IQ3CC 


1 ! 


* 


/PROGRAM REG1STER/<15><12> 


3415 


014476 


0<^O115 


020040 


042522 








3416 


014504 


04(1507 


052123 


051 105 








3417 


014512 


0i<)50t5 












3418 


014514 


0<iO0a0 


041520 


020040 






/ PC UNDER TEST/ 


3419 


014522 


0^0040 












3420 


014530 


0^1105 


052040 


051505 








3421 


014536 


0100124 












3422 


014540 


0^1040 


HOlf «l 


_ 


0^2 S 


• ASCI 1 


/ REGISTEK/<15><12> 


3423 


014546 


042524 












3424 


014553 


125 


042 116 


051 105 




_ 


/UNDER TEST/ 


3425 


014560 


0^2040 












3426 


014566 


0bll2O 




n/in533 


0^3 1 




/PR0GRAM/<15><12> 


3427 


014574 


0B6515 


012 










3428 


014577 


040 








ASCI2 


/ PC/ 


3429 


014604 


0b 11 20 




040522 




• ASCI I 


/PROGRAM REGISTER EXPECTED ACTUAU EXPECTED 


3430 


014612 


0^0115 


01 3191 ct /in 










3431 


014620 


0*t4507 




051 lot 








3432 


014626 


0^0040 




054105 








3433 


014634 


042520 




042 105 








3434 


014642 


0<!0040 


020040 


040440 








3435 


014650 


(9^2103 




0201 1 4 








3436 


014656 


0^0040 


042440 


050 130 








3437 


014664 


041505 


042524 


020104 








343S 


014672 


0^0040 


041 50 1 


052524 








3439 


014700 


046101 












3440 


014704 


0^0040 


041520 


020040 




•ASCIZ 


/ PC UNDER TEST ADOR, BITS ADDR. BITS ABORT PC 


3441 


014712 


0^0040 


052440 


0421 16 








3442 


014720 


051105 


052040 


051505 








3443 


014726 


0ifei24 




0421 04 








3444 


014734 


0«!7122 


041 040 


0521 1 1 








3445 


014742 


0<i0t23 


040440 


042104 








3446 


014750 


0^7122 


041040 


052111 








3447 


014756 


0^0123 


040440 


047502 








3448 


014764 


0^2122 


050040 


020103 








3449 


014772 


0<i0e40 


041101 


051117 








3450 


015000 


01^0124 


041520 


000 








3451 


015005 


120 


047522 


051107 


D"5: 


.ASCII 


/PROGRAM REGISTER EXPECTED/<15><12> 


3452 


015012 


046501 


020040 


051040 








3453 


015020 


043505 


051511 


042524 








3454 


015026 


0^^0122 


020040 


042440 
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POMER DOMN AND 


UP ROUTINES 






3455 


015034 


050130 


041505 


042524 










3456 


015042 


01^6504 


012' 












3457 


015045 


040 


050040 


020103 




.ASCIZ 


/ PC 


UNDER TEST ABORT PC/ 


3458 


015052 


01^0040 


020040 


052440 










3459 


015060 


042116 


051105 


052040 










3460 


015066 


031505 


020124 


020040 










3461 


015074 


0*1101 


051117 


020124 










3462 


015102 


041520 


000 












3463 




015106 








.EVEN 






3464 


015106 


001324 


001622 


000000 


O'l: 


.WORD 


SHLTAD, 


iPAKITYjO 


3465 


015114 


0^1622 


000000 




Dfat 


.WORD 


PARITY, 


.0 


3466 


015120 


001324 


000000 




DT3: 


.MORD 


SMLTAD, 


,a 


3467 


015124 


0101324 


001622 


001326 


0|4I 


.WORD 


SMLTADi 


r PA'<ITY , SGDADR , SBDAORr SGDDA 1 , SBODAT 


3468 


015132 


0101330 


001332 


001334 










3469 


015140 


01110000 














3470 


015142 


0ID1324 


001622 


001332 


DT5! 


.HOHO 


SMLTAD) 


,PA><ITYp$GODAT,0 


3471 


015150 


000000 














3472 


















3473 




000001 






.tNO 
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003752 


ABORT 


003430 


ACCEPT! 


104406 




wl9*IVCO 


• * 






004 162 


g 


004236 




00 1 7 06 


6 1 T0 * 


VttVUV i 


BIT00 ■ 




BIT01 » 


000002 


BTTB3 
HTTuf ' 


10I00KIO'* 


BIT03 > 


0000 1-0 


BIT04 ■ 


annniaa 


BIT05 ■ 


000040 












aaniian 

WVHW 




ant ana 


D IT 1 ■ 




BlTtS * 




SIT^ 1 ■ 




BITi2 s 


1 0000 




O 301010101 


BITtt ■ 


040000 


BITtS ■ 


1 00000 


B IT2 ■ 


000004 


B1T3 ■ 




BIT4 ■ 


000020 


BIT5 ■ 


000040 


S IT6 ■ 


000100 


B1T7 * 




BITS ■ 


000400 


BIT4 ■ 


001000 


BLKCNT 


001632 


BPTVEC* 




B0 


00431S 


Bl 


004370 


B2 


004444 


03 




B4 


004612 


B5 


004706 


B6 


004766 




(905042 


CHECKL 


011 550 


COMPUT 


003204 


CPU40 


001642 


C0 




CI 


0052 1 


C2 


005304 


C3 


005360 


G4 


005436 


C5 


00S514 


C6 


005570 


C7 


005644 


C6 


005742 





006020 


DO 


006006 


000 


006064 




006 144 


OHl 


014470 


DH2 


014540 


DH3 


01 4566 


0H4 


1 4604 


DH5 


015005 


OISPUA* 


177570 


OTl 


015106 


DT2 


0151 14 


DT3 


015120 


0T4 


015124 


0T5 


015142 


00 


006076 


01 


006156 


E 


006320 


EMTVEC" 


000030 


EM 1 


1 3752 


EHie 


014252 


EMI 1 


014326 


EM12 


014403 


EM2 


013776 


EM3 


014327 


EM4 


014055 


EMS 


014120 


EM6 


0141 45 


EM7 


014212 


ERRVECa 


000004 


E0 


006326 




006502 


£3 


036510 


p 


006634 




S0S5S4 




Si 1474 


Fa 


006644 


F I 


006774 


G 


007056 


GETCHRa 


1 04402 


GETSTRa 


104404 


GO 


002326 


G0 


007066 




007 140 


HOLDLO 


010302 


H0 


007150 


HI 


007 1 3A 




007242 


H3 


007216 


H4 


007222 


INITIA 


011506 


INTERT 


00 1644 


KPARa" 


00 1 620 




000020 




000230 




000232 




000234 


KPAR3 


000236 


KPAR4 


000240 


KPAR5 


000242 


KPAR6 


000244 


KPAK7 


000246 


KPDR0 


00021 


KPDR 1 


0002 1 2 


KPDR2 


000214 


KPDR3 


000216 


KPDR4 


000220 


KPDR5 


000222 


KPDR6 


000224 


KPDR7 


000226 


KTTIHE 


002324 


L 


007320 


LEAFCN 


001636 


M 


007374 


MEMAD 


001640 


HRK0 


006324 


MRKi 


006506 


MSGTYP 


002372 


HSREGF 


001626 


N a 


000067 


NEWSTK 


001476 


NEXTl 


002514 


NN 


007450 


NOMQRE 


0031 72 


NOREG 


0n3144 


NTERAD 


001446 


NTER0 


001450 


NTERl 


001452 


NTEPie 


001470 


NTERll 


001472 


NTER12 


001474 


NTER2 


001454 


NTER3 


001456 


NTER4 


001460 


NTER5 


001462 


NTER6 


001464 


NTER7 


001466 


ONETHY 


003500 


P 


007526 


PARCOR 


003112 


PARITY 


001622 










177776 


PSPCOR 


001624 


PSN ■ 


177776 


PWRVEC* 


000024 


R 


007604 


RED 


010^00 


RE5TAR 


011464 


RESTOR 


001634 


RESVECa 


000010 


Ha *xaeaaeo 


Rt ■ 


(000001 


R2 » 


(000002 


R3 1X080003 


R4 'xzeaaai 


R5 ■X00000S 


R6 ■X000e06 


R7 aX000007 


SAVUOC 


010126 


SEGVEC 


000250 


SP ■X000006 


SR0 


000204 


SRa 


000206 


STACK ■ 


001100 


START 


003620 


SWR a 


177570 


SW0 « 


000001 


SU00 ■ 


000001 


SW01 ■ 


000002 


SM02 a 


000004 


SW03 ■ 


000010 


SIII04 ■ 


000020 


SW0S ■ 


000040 


SM06 a 


000100 


SW07 I 


000200 


sw0a ■ 


000400 


SM09 ■ 


001000 


SMI a 


000002 


SWt0 ■ 


002000 


SMll ■ 


004000 


SM12 « 


010000 


SW13 a 


020000 


SM14 ■ 


040000 


SWIS > 


100000 


SM2 ■ 


000004 


SW3 a 


000010 


SNA ■ 


000020 


SH5 ■ 


000040 


SKI6 ■ 


000100 


SW7 a 


000200 


SHB ■ 


000400 


SM9 ■ 


001000 


T 


007750 


TBITVEa 


000014 


TKB 


012622 


TKS 


012620 


TRAPVE« 


000034 


THTVECa 


000014 
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T8T1 


003226 


TST10 


004046 


TSTll 


004124 


TST12 


00420? 


TST13 


004256 


TST14 


004332 


TST15 


004410 


TST16 


004464 


T8T17 


004556 


TST2 


003250 


TST20 


004632 


TST21 


004726 


TST22 


005006 


TST23 


005062 


TST24 


005136 


TST25 


005230 


TST26 


005324 


TST27 


005400 


TST3 


003272 


TST30 


005456 


T5T31 


005534 


T8T32 


005610 


TST33 


005664 


TST34 


005762 


T5T35 


006040 


TST36 


006116 


T8T37 


006176 


TST4 


003334 


TST40 


006352 


TST«1 


006534 


TST42 


006664 


TST43 


007014 


TST44 


007106 


TST45 


007170 


TST46 


007262 


TST47 


007340 


TST5 


0)9^374 


TaT5o 


»io74i«i 


T5 1 5i 


6«747o 


T5T52 


007546 


TST53 


007624 


TST54 


007674 


TST55 


0B7774 


TST56 


010076 


TST57 


010252 


TST6 


003716 


TST60 


010426 


TST61 


010534 


TST62 


010636 


TST63 


010740 


TST64 


011076 


TST65 


011234 


T5T66 


011372 


T8T7 


003772 


TYPE a 


104400 


TYPERR 


012776 


T0 


007754 


U3ERTY 


001630 


V 


010052 


VECSET 


011450 


V0 


010056 


VI 


010162 


V2 


010166 


V3 


010336 


V4 


010342 


M 


010514 


WHICH! 


003376 


XX 


010616 


Y 


010720 


YELLOW 


010224 


Z0 


01!U5b 


Zl 


011214 


Z2 


011352 


SACCEP 


012314 


SBOADR 


001 J30 


SBDOAT 


001334 


SBELL 


012056 


SB20CT 


013350 


SB201 


013376 


SB2016 


013362 


SCMl a 


000013 


SCM2 a 


000026 


SCM3 a 


000013 


SCM4 a 


000013 


SCRLF 


012453 


SOOAGN 


012052 


SENOAD 


012042 


SEDP 


011770 


SERFLG 


001314 


SERRTB 


001500 


SERTTL 


001312 


SESCAP 


012774 


SPILLS 


001105 


SGDADR 


001326 


SGOOAT 


001332 


SHLT 


012634 


SHLTAD 


001324 


SICNT 


001304 


SILLUP 


013734 


SITEMB 


001322 


IKTOUT 


013314 


SKTll 


002304 


SLF 


012454 


SLPADH 


001306 


SLPERR 


001310 


SLSTBL 


013346 


SMXCNT 


012312 


SNULL 


001104 


SOCNT 


013552 


SOHODE 


013554 


SOVER 


012274 


SPASS 


001300 


SPOWER 


013742 


SPNRON 


013606 


SPNRUP 


0136^4 


SQUES 


012452 


SRDSZ a 


000010 


SREAOC 


012456 


SREAOS 


012512 


SREGAD 


001336 


$REG0 


001340 


SREGl 


001342 


SRE&10 


001360 


SREGll 


001362 


SREG12 


001364 


SREG2 


001344 


$REG3 


001346 


SREG4 


001350 


SREG5 


001352 


SREG6 


001354 


$REG7 


001356 


SSAVR6 


013740 


SSCOPE 


012062 


SSETAD 


001416 


SSETUPa 


0001917 


SSETO 


001420 


SSETl 


001422 


SSETtO 


001440 


SSETll 


001442 


SSET12 


001444 


SSET2 


001424 


SSET3 


001426 


SSET4 


001430 


$8ET5 


001432 


SSET6 


001434 


SSETT 


001436 


SSIZE 


013124 


SSS a 


000001 


ISTUP a 


177777 


SSVLAO 


012254 


SSWR a 


167400 


STIMES 


012310 


ITMPAD 


001414 


STMH0 


001366 


STMPl 


001370 


ITMP10 


001406 


STMPll 


001410 


STMP12 


001412 


STMP2 


001372 


$TMP3 


001374 


ITMP4 


001376 


STMPS 


001400 


$TMP6 


001402 


$TMP7 


001404 


STN > 


000001 


STPB 


001102 


ITPFLG 


001106 


STPS 


001100 


STRAP 


013556 


STRP a 


000010 


STRPAD 


013576 


STSTNM 


001302 


STTYIN 


012624 


ITYPE 


001110 


SXTSTR 


012070 


S0FILU 


013553 


, a 


015152 
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